ggplot2 中的分組條形圖

Question

我想復制這個圖（組之間有分面） （分面完成）在此處輸入圖像描述這是我的嘗試：

library (ggplot2)
data<- data.frame(
  d = rep(LETTERS[21:26], 10),
  val = rnorm (60),
  c = rep(LETTERS[1:10], each = 6)
)

ggplot(data, aes(c, val)) + 
 geom_bar(stat = 'identity', aes(fill = val), position = "dodge") +
 facet_grid(data[, 1] ~ .)

和圖形垂直排列而不是躲避位置。 我該怎么辦？

先謝謝了。

Answer 1

我認為您不需要facet_grid() ，只需填寫'd' 。

ggplot(data, aes(c, val)) +
  geom_bar(stat = 'identity', aes(fill = d), position = "dodge")

---

根據OP的評論，我們還可以使用facet_grid(cols = vars(d)) 。

ggplot(data, aes(c, val)) + 
  geom_bar(stat = 'identity', aes(fill = val), position = "dodge") +
  facet_grid(cols = vars(d)) # or facet_grid(. ~ d)