如何在R中的因子旁边制作整体箱图？

Question

我正在尝试创建一个显示变量的所有因子以及样本大小的箱线图，并且在绘图的末尾还需要一个将所有值合并为一个的整体箱图。我正在使用以下代码行来完成所有事情，除了制作整体情节：

library(ggplot2) 
library(plyr)
xlabels <- ddply(extract8, .(Fuel), summarize, xlabels = paste(unique(Fuel), '\n(n = ', length(Fuel),')'))

ggplot(extract8, aes(x = Fuel, y = Exfiltration.Fraction.Percentage))+geom_boxplot()+
  stat_boxplot(geom='errorbar', linetype=1) + 
  geom_boxplot(fill="pink") + geom_hline(yintercept = 0.4) + 
  scale_x_discrete(labels = xlabels[['xlabels']]) + ggtitle("Exfiltration Fraction (%) by Fuel   Type")

不确定如何继续添加将所有因素合并为一个的箱线图。

Answer 1

这当然不是解决它的最优雅方式，但它有效：

1. 将数据集复制到新对象中。
2. 在新对象中，将包含因子的变量的内容替换为您想要的标签，例如“Total”。
3. 使用rbind将新旧对象附加在一起，并将结果归因于新对象。
4. 在ggplot中用新对象替换旧对象。

我有同样的问题，找不到答案并继续这样做。