ggplot：将新数据添加到现有的分组箱图中

Question

我用ggplot2创建了一个分组的箱线图。现在，我想通过以下方式将其他数据添加到现有绘图中： 对于每个月，我都有一个“最佳”值，该值应显示为点，并且这些点应由一条线连接。这是所需的状态：

如何将这些点和线添加到绘图中？ 我能不能将连接线放在箱形图的后面？

这是我的当前状态和数据：

1. 不带点的ggplot：

2. 数据框：Data frame

R代码：

data("MyData")
MyData$Month <- as.factor(MyData$Month)

head(MyData)

MyPlot <- ggplot(MyData, aes(x=Month, y=Note, fill=Treatment)) + 
  geom_boxplot()   
MyPlot

提前谢谢！

Answer 1

只需添加将y映射到其他变量的geom。为了简单起见，我将一些美学元素移至geom_boxplot。

MyPlot <- ggplot(MyData, aes(x=Month)) + geom_boxplot(aes(y=Note, fill=Treatment)
MuPlot <- MyPlot + geom_pointline(aes(y=Optimum), colour="green", stroke="black")

但是，这不会添加您指向图例的位置，因为ggplot2不支持相同比例的多种编码（即同时使用Treatment和单独的颜色变量）。

几何geom_pointline来自“柠檬”包。

第二点，尝试第二行：

MuPlot <- MyPlot + geom_pointline(aes(y=Optimum, colour="Optimum"), stroke="black") + scale_colour_manual(values('Optimum'='green'))