r - 按组划分的真/假值计数条形图(斜线图)

Question

我对 R 和 ggplot 比较陌生。而且我不确定我想要的是否可行。

这是(一部分)我的数据:

> mdf
   Batch     A     B     C     D     E
1      G FALSE  TRUE FALSE  TRUE FALSE
2      G FALSE FALSE FALSE  TRUE FALSE
3      G FALSE  TRUE FALSE FALSE FALSE
4      G FALSE FALSE FALSE  TRUE FALSE
5      G FALSE FALSE  TRUE  TRUE  TRUE
6      G FALSE FALSE  TRUE  TRUE  TRUE
7      G FALSE FALSE FALSE FALSE  TRUE
8      G FALSE FALSE  TRUE  TRUE  TRUE
9      G FALSE FALSE FALSE  TRUE FALSE
10     G FALSE FALSE FALSE  TRUE  TRUE
11     G FALSE FALSE FALSE FALSE  TRUE
12     G FALSE FALSE FALSE  TRUE FALSE
13     G FALSE FALSE FALSE  TRUE FALSE
14     G FALSE FALSE FALSE  TRUE FALSE
15     G FALSE FALSE FALSE  TRUE FALSE
16     G FALSE FALSE FALSE  TRUE FALSE
17     G FALSE FALSE  TRUE  TRUE FALSE
18     G FALSE FALSE  TRUE  TRUE  TRUE
19     A FALSE FALSE FALSE  TRUE  TRUE
20     A FALSE FALSE FALSE  TRUE  TRUE

其中 Batch 可以是 A、B、G、R、S 中的任何一个，其他列 (A-E) 都是 bool 值/逻辑值。

我能够创建一个图表来计算 B 列中的 TRUE 值，如下所示:


使用:

ggplot(data = mdf, aes(x = Batch, y = as.numeric(B), fill = Batch))
    + stat_summary(fun.y = sum, geom = "bar")

同样，我可以轻松地为其他列(A、C、D、E)创建另外 4 个图形。

但是，是否可以将这 5 个图形“合并”在一个图形中？换句话说，我想要一个图表，其中我将有 5 个组(如上图所示)用于 'Batch' 的 5 个值，并且在每个组中，我需要一个单独的条形图，其中包含 5 列中每一列的计数(AE)。这是可行的吗？

更新:这是我正在寻找的(使用@mtoto 的建议后创建的)

Answer 1

是的，这是可能的，你只需要先 reshape 你的数据，然后你就可以使用 position = "dodge"为每个 key 画一个条形.与 tidyr :

library(tidyr)
library(dplyr)
library(ggplot2)

mdf %>% gather(key, value, -Batch) %>%
  ggplot(.,(aes(Batch, as.numeric(value), fill = key))) +
  stat_summary(fun.y = sum, geom = "bar", position = "dodge")