R 如何使ggplot2中的可变钢筋宽度不重叠或间隙

geom_bar在具有固定宽度条的情况下似乎工作得最好——根据研究，即使条之间的间距似乎也是由宽度决定的。但是，当宽度可变时，它不会像我预期的那样响应，导致不同条之间出现重叠或间隙（如图所示）

要了解我的意思，请尝试这个非常简单的可复制示例：

x <- c("a","b","c")
w <- c(1.2, 1.3, 4) # variable widths
y <- c(9, 10, 6) # variable heights

ggplot() + 
geom_bar(aes(x = x, y = y, width = w, fill=x), 
 stat="identity", position= "stack")

---

x似乎没有任何简单的解决方案，因此我们应该将x轴视为连续的
w
，并手动计算记号和条中心所需的位置（非常有用）：

#pos是我们感兴趣的酒吧中心的明确公式：
#最后+一半（上一个_宽度）+一半（当前_宽度）
pos您现在可以使用
mekko
软件包执行此操作：
解决了问题，非常感谢。也许GGPROT2 DEVS的功能考虑添加位置选项？@ RoBouLoVales，没问题。也许，你可以试试看。谢谢你的建议。我也这么做了，但在ggplot问题页面上看不到。似乎已经被删除了-有什么想法吗？@RobinLovelace，对我来说似乎很好。我相信它会被移到“功能”上，以防他们认为应该添加此功能。对于这样的东西，使用
scale\u x\u discrete
不是更容易吗？
# pos is an explicit formula for bar centers that we are interested in:
#        last + half(previous_width) + half(current_width)
pos <- 0.5 * (cumsum(w) + cumsum(c(0, w[-length(w)])))
ggplot() + 
  geom_bar(aes(x = pos, width = w, y = y, fill = x), stat = "identity") + 
  scale_x_continuous(labels = x, breaks = pos)