я есть этот фрейм данных:

Unit <- c(A, B, C, D)
Yes <- c(50, 65, 20, 41)
No <- c(70, 67, 40, 20)
Missing <- c(10, 12, 8, 7)
df <- data.frame(Unit, Yes, No, Missing)

Я хочу использовать простые гистограммы, такие как в Excel (см. Прилагаемый график):Excel Plot

https://i.stack.imgur.com/BvWSA.jpg

Я использовал ggplot, но только для одного Var. Если я добавлю другие, это даст мне ошибку:

ggplot(data = df, aes(x = Unit, y = Yes)) +
  geom_col() +
  geom_text(aes(label = Yes), position = position_stack(vjust = 0.5))

Спасибо.