如何在 r ggplot2 中的图上叠加箱形图答案

【问题标题】：How can I overlay a box plot over plots in r ggplot2如何在 r ggplot2 中的图上叠加箱形图
【发布时间】：2020-06-16 12:49:11
【问题描述】：

我想在第 1 天和第 2 天的时间 a 和 b （每个子块一个箱形图）覆盖相同单位的不同变量的箱形图（用每个数据点测量）。有没有办法在 ggplot2 中做到这一点？

tdata <- import ("plant_temperature.csv")
tdata$Distance <- as.factor(tdata$Distance )

p <- ggplot(data = tdata, aes( y=Temp ,x=Distance,color=Type)) + 
  geom_point() +
  geom_boxplot( aes(y = Ambient))

p + facet_grid(cols = vars(Time),rows = vars(Day))

样本数据：

"Day","Time","Type","Temp","Distance","Ambient"
"1",1,"a","s",5,"1",4.4
"2",1,"a","f",3.1,"2",6.3
"3",1,"a","s",5.9,"3",3.1
"4",1,"a","f",8.4,"4",2.5
"5",1,"a","s",5.5,"1",7.7
"6",1,"b","f",9.9,"2",7.1
"7",1,"b","s",2.2,"3",2.1
"8",1,"b","f",6.9,"4",5.1
"9",1,"b","s",2.9,"1",9.4
"10",2,"b","f",8.8,"2",5.7
"11",2,"a","s",0.6,"3",6.3
"12",2,"a","f",2.2,"4",4.9
"13",2,"a","s",3.1,"1",0.8
"14",2,"a","f",1.4,"2",6.5
"15",2,"a","s",4,"3",2.1
"16",2,"b","f",8.4,"4",1.6
"17",2,"b","s",5.2,"1",4.4
"18",2,"b","f",2.2,"2",7.9
"19",2,"b","s",7.9,"3",5.3
"20",2,"b","f",2.7,"4",5.2

在第 1 天和第 2 天的时间 a 和 b 处使用传感器 f 和 s 在距离 1 到 4 处测量的温度：

如果我尝试为每个子块添加 1 个箱形图，我最终会得到每个子块 4 个箱形图。

【问题讨论】：

这很有可能。您有任何示例数据可以用来作为示例吗？
请不要从我们无权访问的文件中读取数据，而是直接在您的示例代码中创建tdata。如果您提供数据，我将能够回答。
我添加了数据，我不确定我应该用什么格式发布它。我还发现我可以在距离 5 上添加一个箱线图，效果很好：p<-ggplot(data = tdata, aes( y=Temp ,x=Distance,color=Type))+geom_point() +geom_boxplot( aes(y = Ambient,x=5,color="green")) p+facet_grid(cols = vars(Time),rows = vars(Day))跨度>
如果此代码令人满意地回答了您的问题，您应该在下面自己回答问题，并为此获得荣誉。在可能的情况下回答自己的问题是完全可以接受的，甚至是鼓励的，因为这个想法是建立一个银行问题和答案，以便在未来帮助其他人。您还可以编辑删除对温度的引用的问题，因为数据是否适用于温度不会影响答案。我可以帮助完善问题和答案，但请自己输入答案，因为建立声誉会很有用。
感谢您的建议。如果我可以做任何进一步的改进，请告诉我！

标签： r ggplot2

【解决方案1】：

在单独的 x 值上添加箱线图看起来不错：

tdata$Distance <- as.factor(tdata$Distance )
p<-ggplot(data = tdata, aes( y=Temp ,x=Distance,color=Type))+geom_point() +geom_boxplot( aes(y = Ambient,x=5,color="Ambient"))
p+facet_grid(cols = vars(Time),rows = vars(Day))

有人知道如何更改图例符号吗？也许我应该问一个单独的问题。

【讨论】：

这是与符号相关的单独帖子：link