使用melt（）函数后，使图中的所有线均匀颜色

Question

我使用了melt，因此我可以使用ggplot2在同一个图表上轻松显示多行。但是，这只有在我将颜色设置为变量时才能正常工作。当我尝试将其改为黑色或任何其他颜色时，我会得到这种不幸的模式。我确信这是一个快速修复，但我无法弄清楚

df.melted <- melt(john, id = "sample_size")
GRAPH<-ggplot(data = df.melted, aes(x = sample_size, y = value, color = variable))+
  geom_line()+theme_classic()+coord_cartesian(xlim = c(0,100))+theme(legend.position="none")+

结果图在这里......

当我尝试更改设置颜色=＆＃34;黑色＆＃34;在aes（）或geom_line（）中我得到这些红线：