更改r中ggplot2中的线型

更改r中ggplot2中的线型,r,ggplot2,R,Ggplot2,我有一个这样的数据框 df <- data.frame(date = c('2015-11-23','2015-11-24','2015-11-25','2015-11-23','2015-11-24','2015-11-25'), variable = c('LCNB', 'LCNB','LCNB','LCDEF','LCDEF','LCDEF'), value = c(1,2,3,3,2,1)) 到目前为止,我的代码只生成了两行不同的颜色,如

我有一个这样的数据框

 df <- data.frame(date = c('2015-11-23','2015-11-24','2015-11-25','2015-11-23','2015-11-24','2015-11-25'),
          variable = c('LCNB', 'LCNB','LCNB','LCDEF','LCDEF','LCDEF'),
          value = c(1,2,3,3,2,1))
到目前为止,我的代码只生成了两行不同的颜色,如何才能使它们也具有不同的线型


感谢您的帮助,

您只需对线型执行与对颜色相同的步骤,但对于
线型

ggplot(df, aes(x=date, y=value, color=variable, linetype = variable)) + 
  geom_line(size=1.07,) + 
  scale_color_manual(
    labels = c("Nb",'Def'),
    values = c("#E69F00", "#0072B2")
  )   +
  scale_linetype(labels = c("Nb", "Def")) + 
  scale_x_date(labels = date_format("%Y-%m-%d"), breaks = date_breaks("2.8 month")) +
  theme(axis.text.x = element_text(angle = 0, vjust = 0.5,   hjust=1)) +
  labs(x="Dates",y="%", colour = "LC", linetype = "LC") + 
  theme_bw()+
  theme(
    panel.grid.major = element_blank(),
    panel.grid.minor = element_blank(),
    axis.line = element_line(colour = "black"),
    plot.margin=unit(c(0,1,0.3,1), "cm"),
    legend.position = c(0.95,0.85))

您只需要对线型执行与对颜色相同的步骤,但对于
线型

ggplot(df, aes(x=date, y=value, color=variable, linetype = variable)) + 
  geom_line(size=1.07,) + 
  scale_color_manual(
    labels = c("Nb",'Def'),
    values = c("#E69F00", "#0072B2")
  )   +
  scale_linetype(labels = c("Nb", "Def")) + 
  scale_x_date(labels = date_format("%Y-%m-%d"), breaks = date_breaks("2.8 month")) +
  theme(axis.text.x = element_text(angle = 0, vjust = 0.5,   hjust=1)) +
  labs(x="Dates",y="%", colour = "LC", linetype = "LC") + 
  theme_bw()+
  theme(
    panel.grid.major = element_blank(),
    panel.grid.minor = element_blank(),
    axis.line = element_line(colour = "black"),
    plot.margin=unit(c(0,1,0.3,1), "cm"),
    legend.position = c(0.95,0.85))