r - 如何在 ggplot2 中绘制并排条形图？

Question

这是我的数据的格式。我需要先让它“整洁”还是这样好？

   Council `2019` `2020`
   <chr>    <dbl>  <dbl>
 1 1          260    206
 2 2          130    157
 3 3           42     48
 4 4           38     42
 5 5           45    126
 6 6           34     26
 7 7           13     21
 8 8           30     13
 9 9           16     15
10 10          15     43

我的目标是为每个委员会创建一个并排的条形图，以显示每个委员会从 2019 年到 2020 年的差异。

谢谢

Answer 1

对于 ggplot2，我建议您先 reshape 形状(从“宽”变为“长”)，然后是小平面:

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

dat %>%
  pivot_longer(-Council, names_to = "year", values_to = "count") %>%
  mutate(Council = as.character(Council)) %>%
  ggplot(aes(Council, count)) +
  geom_bar(stat = "identity", horizontal = TRUE) +
  facet_wrap(~ year)

---

数据:

dat <- read.table(header = TRUE, check.names = FALSE, text = "
Council   2019   2020
1          260    206
2          130    157
3           42     48
4           38     42
5           45    126
6           34     26
7           13     21
8           30     13
9           16     15
10          15     43")