使用ggplot在一个条形图中针对两列绘制因子列

Question

我想使用ggplot绘制条形图，其中一列是因子0/1，其他两列代表计数

我的数据集如下：

id    in      out
0   30036   547148      
1   213176  23902   

我管理了分别针对进出的绘图ID，但无法弄清楚如何将两个图形合并在一起，以使0有两个表示输入计数的小节（输入/输出），而对于1相同。

Answer 1

df <- read.table(header = T, stringsAsFactors = T,
  text = "id    in      out
`0`   30036   547148      
`1`  213176  23902")

library(tidyverse)
df %>%
  gather(direction, value, -id) %>%
  ggplot(aes(id, value, fill = direction)) + 
  geom_col(position = "dodge")