Diretrizes gerais:
Crie um novo .Rmd no RStudio.
Execute as operações assinaladas nos exercícios a seguir.
Salve o .Rmd e submeta-o por meio desta tarefa.
Dica: As barras que delimitam o endereçamento do arquivo no seu computador, quando exibidas no explorer do Windows, são invertidas (). O R trabalha com barras normais (/) para endereçamento.
Dê uma olhada no dataframe Starwars.
glimpse(starwars)## Rows: 87
## Columns: 14
## $ name <chr> "Luke Skywalker", "C-3PO", "R2-D2", "Darth Vader", "Leia Or…
## $ height <int> 172, 167, 96, 202, 150, 178, 165, 97, 183, 182, 188, 180, 2…
## $ mass <dbl> 77.0, 75.0, 32.0, 136.0, 49.0, 120.0, 75.0, 32.0, 84.0, 77.…
## $ hair_color <chr> "blond", NA, NA, "none", "brown", "brown, grey", "brown", N…
## $ skin_color <chr> "fair", "gold", "white, blue", "white", "light", "light", "…
## $ eye_color <chr> "blue", "yellow", "red", "yellow", "brown", "blue", "blue",…
## $ birth_year <dbl> 19.0, 112.0, 33.0, 41.9, 19.0, 52.0, 47.0, NA, 24.0, 57.0, …
## $ sex <chr> "male", "none", "none", "male", "female", "male", "female",…
## $ gender <chr> "masculine", "masculine", "masculine", "masculine", "femini…
## $ homeworld <chr> "Tatooine", "Tatooine", "Naboo", "Tatooine", "Alderaan", "T…
## $ species <chr> "Human", "Droid", "Droid", "Human", "Human", "Human", "Huma…
## $ films <list> <"A New Hope", "The Empire Strikes Back", "Return of the J…
## $ vehicles <list> <"Snowspeeder", "Imperial Speeder Bike">, <>, <>, <>, "Imp…
## $ starships <list> <"X-wing", "Imperial shuttle">, <>, <>, "TIE Advanced x1",…Modifique o seguinte gráfico para que a cor de todos os pontos seja ROSA.
ggplot(starwars,
aes(x = height, y = mass, color = gender, size = birth_year)) +
geom_point(color = "#30509C")## Warning: Removed 51 rows containing missing values or values outside the scale range
## (`geom_point()`).
Adicione texto no título, eixos x e y e tamanho dos pontos. Remova o comentário para ver o efeito.
ggplot(starwars,
aes(x = height, y = mass, color = gender, size = birth_year)) +
geom_point(color = "#30509C") +
labs(
#title = "___",
#x = "___",
#y = "___",
#___
)## Warning: Removed 51 rows containing missing values or values outside the scale range
## (`geom_point()`).
Escolha uma única variável categórica do conjunto de dados e faça um gráfico de barras de sua distribuição.
(Um pouco de código inicial é fornecido abaixo, e o chunk é definido para não ser rodado com eval = FALSE porque o código atual ali não é válido e, portanto, o documento não permitia o knit. Uma vez substituído o código por um código válido, defina a opção “eval = TRUE”, ou remova a opção “eval” por completo, uma vez que está definida como “TRUE” por padrão).
ggplot(starwars, aes(___)) +
geom___Escolha uma única variável numérica e faça um histograma dela.
(Desta vez nenhum código inicial é fornecido, você está por sua conta!)