In msperlin/vdr: Data and Functions for Book Visualizacao de Dados com o R

Question

Agora, use o gráfico anterior, mas modifique o formato dos pontos, definindo que o argumento shape será mapeado de acordo com coluna type. Também aumente o tamanho de todos os pontos do gráfico para 3.

Solution

require(ggplot2)

N <- 100
vec <- rnorm(N)
df <- dplyr::tibble(
  y = vec,
  x = 1:N,
  type = sample(c("A", "B"), size = N, replace = TRUE)
  )

p <- ggplot(df, aes(x = x, y = y, 
                    color = type, 
                    shape = type)) + 
  geom_point(size = 3) + 
  labs(title = "TÍTULO",
       subtitle = "SUBTÍTULO",
       caption = "CAPTION",
       x = "texto X",
       y = "texto Y") + 
  theme_light() + 
  geom_line()

p