如何在格 bwplot 中向 x 轴添加第三个因子答案

【问题标题】：How to add a third factor to the x axis in a lattice bwplot如何在格 bwplot 中向 x 轴添加第三个因子
【发布时间】：2013-06-12 19:38:06
【问题描述】：

我对绘制数据非常陌生，我正在尝试在我的 bwplot 中添加第三个因素。

我的因素是：

站点有 6 个级别（C0、C1、C2、C3、C4、C5）
具有 2 个级别（高、低）的季节性流量
土地利用分为 2 个级别（城市、农村）

我可以使用以下脚本轻松绘制站点和季节性流：

库（格）

bwplot(TN.TP~ Site| Seasonal.Flow,data=C,main="Collie River TN:TP",ylab="ratio",xlab="Site + Flow regime", horizontal=FALSE)

数据链路：https://www.dropbox.com/s/6q8b1svld61pqsr/Collie%203.csv

我的问题是我还想在 x 轴上包括土地利用，其中站点 C0 和 C1 是农村，站点 C2、C3、C4、C5 是城市。我看过ggplot，但还没有弄清楚。即使只是对 C0 和 C1 进行不同的着色也会有所帮助。

【问题讨论】：

你在使用 R 吗？如果是，请标记它！

标签： r plot lattice boxplot

【解决方案1】：

这是ggplot2 的解决方案。

library(ggplot2)
ggplot(data = C, aes(x = Site, y = TN.TP, colour = Land.Use)) +
  facet_wrap( ~ Seasonal.Flow, ncol = 1) +
  geom_boxplot() +
  scale_colour_hue("Land use") +
  ggtitle("Collie River TN:TP") +
  ylab("ratio") +
  xlab("Site + Flow regime")

【讨论】：

太好了，谢谢。是否有一个简单的方法来改变箱线图的颜色？出于某种原因，您提供的 ggtitle 出现错误。 ggtitle("Collie River TN:TP") + ylab("ratio") 中的错误：二进制运算符的非数字参数再次感谢 Sven
@user2479514 1) 您可以使用scale_color_manual 指定您自己的颜色。这将替换 scale_color_hue。例如，您可以尝试scale_color_manual("Land use", values = c("blue", "red"))。 2) 我在ggtitle 之前的行末尾忘记了+ 符号。现在它应该可以工作了。

【解决方案2】：

这是lattice 解决方案：

library("lattice")
C <- read.csv('Collie 3.csv')

bwplot(TN.TP~ Site| Seasonal.Flow,data=C,main="Collie River TN:TP",
   ylab="ratio",xlab="Site + Flow regime", horizontal=FALSE, 
   groups = Land.Use, auto.key=TRUE,
   panel = panel.superpose,
   panel.groups = panel.bwplot)

使用layout()允许您指定列数和行数：

bwplot(TN.TP~ Site| Seasonal.Flow,data=C,main="Collie River TN:TP",
   ylab="ratio",xlab="Site + Flow regime", horizontal=FALSE, 
   groups = Land.Use, auto.key=TRUE,
   panel = panel.superpose,
   panel.groups = panel.bwplot,
   layout = c(1,2))  # same layout as ggplot2 graph

或者，如果您想将它们真正分开，请尝试以下操作：（看第三个因素被添加到“公式”中）

bwplot(TN.TP~ Site| Seasonal.Flow * Land.Use ,data=C,
main="Collie River TN:TP", ylab="ratio",xlab="Site + Flow regime",
horizontal=FALSE)

【讨论】：