0

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

我的因素是:

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

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

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)

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

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

4

2 回答 2

0

这是一个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)

Usinglayout()允许您指定列数和行数:

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)
于 2015-02-13T13:26:17.290 回答
0

这是一个解决方案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")

在此处输入图像描述

于 2013-06-13T07:51:14.193 回答