R 如何在ggplot上的多行打印中添加颜色和图例，而不使用重塑包装中的melt？

我正在用sme x轴在同一个绘图上绘制两条线，通过以下几条线绘制。 我正在执行下一行，但无法看到颜色和图例

ggplot(final, aes(x = Date)) + geom_line(aes(y = cocastock)) + geom_line(aes(y = procterstock))  + scale_color_manual(values = c(cocastock = '#008B00', procterstock = '#FFFFFF'))

也试过

ggplot(final, aes(x = Date)) + geom_line(aes(y = cocastock)) + geom_line(aes(y = procterstock))  + scale_color_manual(values = c('#008B00','#FFFFFF'))

---

但是dosen不起作用

scale\u color\u手册

仅在您在

aes

中指定了颜色时起作用，因此您需要：

ggplot(final, aes(x = Date)) + 
  geom_line(aes(y = cocastock, colour = "cocastock")) + 
  geom_line(aes(y = procterstock, colour = "procterstock"))  + 
  scale_color_manual(values = c(cocastock = '#008B00', procterstock = '#FFFFFF'))