Introdução a Método Computacionais para as Ciências Sociais: Exercício 5
Introduções.
Seguimos com nossas instruções.
Entrega dos exercícios até sexta-feira, meia noite.
Entrega com documento em formato pdf.
Entrega via slack.
Divirtam-se.
Neste exercício, a idéia fundamental é que vocês repliquem três exemplos de gráficos que eu colocarei aqui.
Todos so gráficos vem de bancos de dados criados por mim.
É importante que vocês acertem:
As representações gráficas (x, y, fill, color)
As formas geométricas (geoms).
As quebras de gráficos (facets, coord_flip, entre outros.)
Não me importa a customização que escolherem.
Divirtam-se!
Gráfico 1.
Reproduzam este gráfico:
Dados
library(tidyverse)
set.seed(123)
x <- rnorm(1000)
y <- 1 + 2*x + 1*x^2 - .5*x^3 + rnorm(1000,sd=3)
dados <- tibble(y,x) %>%
mutate(color = ifelse(x>=0,"Pos-Tratamento","Pre-Tratamento"),
y = ifelse(x>=0,y+5,y),
color = fct_rev(color))
# Gráfico Aqui:Gráfico 2.
Reproduzam este gráfico:
Dados
dados <- pmap_df(list(x=c(0, 0.2, 0.5, 0.7),
y=runif(4, 0.1, 0.5),
z=c("A", "B", "C", "D"),
w=c("1998", "2002", "2006", "2010")),
function(x, y, z, w) tibble(votacao=rnorm(1000, x, y),
partido=z, ano=w))
# grafico aqui. Gráfico 3.
Reproduzam este gráfico:
Dados
library(gapminder)
gapminder## # A tibble: 1,704 x 6
## country continent year lifeExp pop gdpPercap
## <fct> <fct> <int> <dbl> <int> <dbl>
## 1 Afghanistan Asia 1952 28.8 8425333 779.
## 2 Afghanistan Asia 1957 30.3 9240934 821.
## 3 Afghanistan Asia 1962 32.0 10267083 853.
## 4 Afghanistan Asia 1967 34.0 11537966 836.
## 5 Afghanistan Asia 1972 36.1 13079460 740.
## 6 Afghanistan Asia 1977 38.4 14880372 786.
## 7 Afghanistan Asia 1982 39.9 12881816 978.
## 8 Afghanistan Asia 1987 40.8 13867957 852.
## 9 Afghanistan Asia 1992 41.7 16317921 649.
## 10 Afghanistan Asia 1997 41.8 22227415 635.
## # … with 1,694 more rows# grafico aqui