几何线：为分组的变量设置手动颜色

Question

我的数据集包含以下三列

data_sample<-data.frame(value=c(-3,-2,-1,-0.9,-1.25,1.0,2.1,1.9,1.2,1.5),
BP=c(1000,2000,5000,8000,10000),variable=c(rep("overall_diff_cases",5),rep("overall_diff_controls",5)))

其中 BP 是碱基对，对于每个位置，变量列中都有值：overall_diff_controls 和 overall_diff_cases。我有兴趣使用这些点创建 geom_line ggplot 图表。

ggplot(data_sample, aes(x=BP, y=value, group =variable,color=variable)) +
scale_fill_manual(values= c("overall_diff_cases"="#9633FF" ,"overall_diff_controls"="#E2FF33")) + geom_line(size=1.2)

如果我使用上面的代码，ggplot 会使用默认颜色创建绘图。我尝试使用颜色代码（非十六进制）

scale_fill_manual(values= c("overall_diff_cases" = "red" , "overall_diff_controls" = "black"))

我尝试设置 setNames 但没有成功：

ggplot(data_sample, aes(x=BP, y=value, group = variable,color=variable)) +
scale_fill_manual(values=setNames(c("overall_diff_cases","overall_diff_controls"), c( "black","red"))) +
 geom_line(size=1.2)

如何设置兴趣的颜色？数据格式需要保持在同一数据框中显示。

Answer 1

试试这个：

library(ggplot2)

ggplot(data_sample, aes(x=BP, y=value,
                        group =variable,color=variable)) +
  scale_color_manual(values= c("overall_diff_cases"="#9633FF" ,
                               "overall_diff_controls"="#E2FF33")) + geom_line(size=1.2)

输出：

使用scale_color_manual()你可以设置你想要的颜色。

几何线：为分组的变量设置手动颜色

geom line: set manual color for variables that are grouped

r

colors

manual

ggplot2