r - 如何在 R 中向 ggplot 箱线图添加垂直线

Question

我正在根据这些数据绘制箱线图:

MY_LABEL     MY_REAL     MY_CATEGORY
1 [POS]       .56            POS
1 [POS]       .57            POS
1 [POS]       .37            POS
2 [POS]       .51            POS
1 [sim v]     .65            sim v
...

我正在使用 ggplot2:

ggplot( data=myDF, aes( x=MY_LABEL, y=MY_REAL, fill=MY_CATEGORY ) ) +
    scale_colour_manual( values=palette ) +
    coord_flip() + 
    geom_boxplot( outlier.size = 0 )

这工作正常，并按字段对箱线图进行分组 MY_CATEGORY :


我想做两件事:

1) 为了提高这个图的清晰度，我想在各个块之间添加分隔符，即在 POS 之间和 sim v , 之间 sim v和 C等(参见图中丑陋的红线)。
我一直在为 geom_vline 苦苦挣扎没有运气。
或者，我想在块之间添加空格。

2)如果我以灰度打印此图，则无法区分不同的块。我正在尝试强制使用不同的调色板:

scale_colour_manual( values=c("black","darkgray","gray","white") )

再次，没有运气，情节根本没有改变。

你会建议做什么？

Answer 1

这对你有用吗？

require(ggplot2)
mtcars$cyl2<- ifelse(mtcars$cyl > 4, c('A'), c('B')) 
p <- ggplot(mtcars, aes(factor(cyl), mpg))
p + geom_boxplot() + facet_grid(. ~ cyl2, scales = "free", space = "free")

会给这样的东西，