-
Notifications
You must be signed in to change notification settings - Fork 0
/
lab01.R
37 lines (20 loc) · 914 Bytes
/
lab01.R
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
library(tidyverse)
# leitura -----------------------------------------------------------------
match_min <- read_rds("data-raw/rds/match_min.rds")
team <- read_rds("data-raw/rds/team.rds")
team_attributes <- read_rds("data-raw/rds/team_attributes.rds")
glimpse(match_min)
# exercício 1.1. ----------------------------------------------------------
sumario <- match_min |>
select(country_id, country_name, home_team_goal, away_team_goal)
# ...
# exercício 1.2. ----------------------------------------------------------
sumario |>
ggplot() +
# ... +
geom_col()
# exercício 1.3. ----------------------------------------------------------
# barras otimizado
# exercício 2.1. ----------------------------------------------------------
# exercício 2.2. ----------------------------------------------------------
# exercício 2.3. ----------------------------------------------------------