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'))