R 在ggplot中创建具有2列值的减淡图形

我正在努力解决以下问题，因为我想创建一个dodged columns图（数据集包含9行，这是一个示例）。我想知道是否有一个解决方案不需要旋转更长的时间，如果旋转更长，我需要做什么

数据集是

occ_状态_之前 以前的价值 之后的价值 工作 0.3 0.35 独立的 0.4 0.36 失业的 0.2 0.9

---

对于

ggplot2

，最好使用长格式的数据。尝试：

library(tidyr)
library(ggplot2)

df %>%
  pivot_longer(cols = -occ_status_before) %>%
  ggplot() + aes(occ_status_before, value, fill = name) + 
  geom_col(position = 'dodge')

---

对于

ggplot2

，最好使用长格式的数据。尝试：

library(tidyr)
library(ggplot2)

df %>%
  pivot_longer(cols = -occ_status_before) %>%
  ggplot() + aes(occ_status_before, value, fill = name) + 
  geom_col(position = 'dodge')