r - 如何在多面R ggplot boxplot中丢弃未使用的因素？

以下是一些用于制作箱形图的示例代码:

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(DEAD)，显示我想要实现的目标:

最佳答案

使用scales='free.x'参数facet_wrap。但是我怀疑您需要做更多的事情才能获得想要的情节。

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