Skip to main content
1 de 2
Rui Barradas
  • 19mil
  • 2
  • 14
  • 28

O código da pergunta está a falhar porque não tem color, shape e linetype em aes(). O ggplot atribui os valores dos elementos estéticos (aesthetics) consoante os valores das variáveis, o que torna tudo mais f+acil e com experiência, intuitivo.

Neste caso vou usar a base mtcars e mapear a variável am às aes pedidas. Depois os valores podem ser modificados com as scale_*.

O theme final serve para prolongar as linhas um pouco mais para os lados.

library(ggplot2)
library(dplyr)

mtcars %>%
  mutate(am = factor(am, labels = c("manual", "automatic"))) %>%
  ggplot(aes(hp, disp, colour = am, shape = am, linetype = am)) +
  geom_point() +
  geom_line() +
  scale_color_manual(values = c("red", "black")) +
  scale_shape_manual(values = c(15, 19)) +
  scale_linetype_manual(values = c("solid", "dashed")) +
  theme_bw() +
  theme(legend.key.width = unit(1, 'cm'))
Rui Barradas
  • 19mil
  • 2
  • 14
  • 28