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

Question

Para o gráfico anterior, use as funções do pacote colorspace para implementar a paleta de cores "Harmonic" do canal color (dados qualitativos).

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, 
                    label = type)) + 
  #geom_point(aes(size = x)) + 
  labs(title = "TÍTULO",
       subtitle = "SUBTÍTULO",
       caption = "CAPTION",
       x = "texto X",
       y = "texto Y") + 
  geom_line() + 
  geom_text() + 
  colorspace::scale_colour_discrete_qualitative("Harmonic")

p