首页 > 解决方案 > 使用 ggplot2 转换图表中线条上的颜色

问题描述

我正在做一些与插入符号包相关的预测。这个预测的输出你可以在下面看到

data_for.cm_rpart <- data.table(Data = c(final_predictions.rpart$Customs_duties,final_predictions.rpart$Predictions),                      
                                              Date = c( rep(final_predictions.rpart$Date )),
                                              Type = c(#rep("Train data", nrow(data_train)),
                                                rep("Test data", nrow(final_predictions.rpart)),
                                                rep("Forecast", nrow(final_predictions.rpart))))
              
              ggplot(data_for.cm_rpart, aes(Date, Data, color = Type), palette = c("#0073C2FF", "#FC4E07")) +
                geom_line(size = 0.9, alpha = 0.75)

在此处输入图像描述

在这张图表上,您可以看到最后一条线是红色的,这条线实际上与绿色重叠。

但我需要改变这一点并制作一些类似颜色的图表,如下图: 在此处输入图像描述

那么任何人都可以帮助我如何更改颜色并使第一张图表与第二张图表相似吗?

标签: rggplot2

解决方案


也许您应该在内部设置 alphaaes并稍后使用scale_alpha_manual2 行具有不同的透明度进行更改。

# example data
data_for.cm_rpart = data.frame(Date = 2017:2020, 
                               Data = c(1:4, 3:4, 3:4), 
                               Type = c(rep('forecast',4), 
                                        rep('test data', 4)))

# plot
ggplot(data_for.cm_rpart, aes(Date, Data, color = Type, alpha = Type), 
       palette = c("#0073C2FF", "#FC4E07")) +
  geom_line(size = 0.9)+
  scale_alpha_manual(values = c(1, 0.5))

推荐阅读