ggplot2 geom_line 按组显示颜色但颜色代码不同

Question

有谁知道如何用不同的颜色代码在一张图中绘制多个折线图？

ggplot(df, aes(x=variable1)) +
geom_line(aes(y=variable2,color=group1))+
geom_line(aes(y=variable3,color=group1))

我想为第一个 geom_line 使用一个颜色代码，为第二个 geom_line 使用不同的颜色代码。

color_group <- c("blue","black","yellow2","orange")
color_flag <- c("green","red","yellow2","cyan")

有

 scale_colour_manual(values=color_group)

我只能同时给他们两个分配一个颜色代码，不能分开。感谢您的帮助！

Answer 1

您可以使用 ggnewscale 包

library(ggnewscale)

ggplot(df, aes(x = variable1)) +
  geom_line(aes(y = variable2, color = group1)) +
  scale_colour_manual(values = color_group) +
  new_scale_color() +
  geom_line(aes(y = variable3, color = group1)) +
  scale_colour_manual(values = color_flag)

ggplot2 geom_line 按组显示颜色但颜色代码不同

ggplot2 geom_line colors by group but with different colorcodes

r

graph

ggplot2