hgw在ggplot2 barplot中使条的宽度相等？

Question

我试图使下图中所有条形的宽度相等.有谁能够帮我？可能吗？或者有没有办法绘制这些数据？

library(ggplot2)
dat <- data.frame(x = c('I','I','I','I','II','II'),
                  y = LETTERS[1:6],
                  z = abs(rnorm(6)))

ggplot(dat, aes(y,z))+ 
  geom_bar(stat = "identity") +
  facet_wrap(~x,scales="free")

我也试过使用参数size和width内部geom_bar但它不起作用.

Answer 1

真正的问题是每个小平面板被迫大小相同,然后内部的情节扩展以填充所有可用空间.随着facet_grid您可以调整每个面面板的空间(但你似乎无法做到这一点facet_wrap).尝试

ggplot(dat, aes(y,z))+ 
  geom_bar(stat = "identity") +
  facet_grid(~x,scales="free", space="free_x")

这给了我