r - 如何删除多面 R ggplot 箱线图中未使用的因素？

Question

下面是一些我用来制作箱线图的示例代码:

stest <- read.table(text="    site  year    conc
    south   2001    5.3
    south   2001    4.67
    south   2001    4.98
    south   2002    5.76
    south   2002    5.93
    north   2001    4.64
    north   2001    6.32
    north   2003    11.5
    north   2003    6.3
    north   2004    9.6
    north   2004    56.11
    north   2004    63.55
    north   2004    61.35
    north   2005    67.11
    north   2006    39.17
    north   2006    43.51
    north   2006    76.21
    north   2006    158.89
    north   2006    122.27
", header=TRUE)

require(ggplot2)
ggplot(stest, aes(x=year, y=conc)) +
  geom_boxplot(horizontal=TRUE) +
  facet_wrap(~site, ncol=1) +
  coord_flip() +
  scale_y_log10()

结果是:

我尝试了所有我能想到的方法，但无法绘制出南面 仅包含显示数据的年份(2001 年和2002 年)的图。我想做的事情可行吗？

这是一个link (死)显示我想要实现的屏幕截图:

Answer 1

将 scales='free.x' 参数用于 facet_wrap。但我怀疑您需要做更多的事情才能获得您正在寻找的情节。

特别是 aes(x=factor(year), y=conc) 在您最初的 ggplot 调用中。