使用ggplot2的箱线图

Question

我对使用ggplot2完全陌生，但听说它具有出色的绘图功能。 我有一个包含不同样本的列表，并且根据三种仪器针对每个样本观察结果。 我想把它变成带有箱线图的人物。 我无法包含图形，但是下面包含了用于创建示例图形的代码。 想法是为每个仪器配备一个带有每个样本盒图的图形。

此外，在图旁边，我想做一个图例，为每个样本编号命名。 我不知道如何开始使用ggplot2。

任何帮助将不胜感激

产生示例图像的R代码为：

#Make data example
Data<-list();
Data$Sample1<-matrix(rnorm(30),10,3);
    Data$Sample2<-matrix(rnorm(30),10,3);
Data$Sample3<-matrix(rnorm(30),10,3);
    Data$Sample4<-matrix(rnorm(30),10,3);

#Make the plots
par(mfrow=c(3,1)) ;
boxplot(data.frame(Data)[seq(1,12,by=3)],names=c(1:4),xlab="Sample number",ylab="Instrument 1");
boxplot(data.frame(Data)[seq(2,12,by=3)],names=c(1:4),xlab="Sample number",ylab="Instrument 2");
boxplot(data.frame(Data)[seq(3,12,by=3)],names=c(1:4),xlab="Sample number",ylab="Instrument 3");

Answer 1

首先，您需要以不同的方式设置数据：作为data.frame而不是矩阵列表。 您需要一栏作为sample ，一栏作为instrument ，一栏作为观测value 。 这是一个伪数据集：

df <- data.frame(sample = rep(c("One","Two","Three","Four"),each=30), 
                 instrument = rep(rep(c("My Instrument","Your Instrument","Joe's Instrument"),each=10),4),
                 value = rnorm(120))

> head(df)
  sample    instrument       value
1    One My Instrument  0.08192981
2    One My Instrument -1.11667766
3    One My Instrument  0.34117450
4    One My Instrument -0.42321236
5    One My Instrument  0.56033804
6    One My Instrument  0.32326817

为了获得三个图，我们将使用faceting 。 为了获得geom_boxplot图，我们使用geom_boxplot 。 代码如下：

ggplot(df, aes(x=sample,y=value)) + 
  geom_boxplot() + 
  facet_wrap(~ instrument, ncol=1)

如果不直接在样本变量中包含图例，则将名称直接放在样本变量中，它将在图表下方显示它们。 这样，人们就不必在名称上引用数字了：可以立即清楚地知道每个图用于什么样本。 请注意，默认情况下，ggplot将因子按字母顺序放置； 如果要更改其他顺序，则必须手动更改。