R 删除水平线（ggplot2）

几周前，我在这里问了一个几乎相同的问题（），并得到了非常好的回复。它工作得很好。唯一的问题是我真的不明白函数中发生了什么。现在我想删除水平线，同时仍然进行镶嵌，并允许在

facet\u网格中使用
scales=“free”
。我不知道如何改变响应以使其适用于水平线

下面是一些帮助讨论的示例代码：

library(ggplot2)
set.seed(10)
CO3 <- data.frame(id=1:nrow(CO2), CO2[, 2:3], 
           outcome=factor(sample(c('none', 'some', 'lots', 'tons'), 
           nrow(CO2), rep=T), levels=c('none', 'some', 'lots', 'tons')))
CO3
x <- ggplot(CO3, aes(x=outcome)) + geom_bar(aes(x=outcome))+ 
     facet_grid(Treatment~Type, margins='Treatment', scales='free') 
x +  theme_bw() + opts(axis.text.x=theme_text(angle= 45, vjust=1, hjust= 1))

库（ggplot2）
种子（10）
CO3你可以在R的食谱中找到如何隐藏水平线的解决方案。只要看看我在线程中发布的链接的结尾。
你可以在R的食谱中找到如何隐藏水平线的解决方案。只要看看我在线程中发布的链接的结尾。我觉得忽略了这个链接很愚蠢那个我想我记得（错误地认为Rcookbook上没有关于水平线删除的答案）。你能提交你最后的评论作为问题的答案吗？我会接受的。提供的链接已断开