如何在R中创建双向直方图？

Question

以下是一些数据： dat＆lt; - cbind（字母，runif（长度（字母）），rnorm（长度（字母））^ 2）

我想创建一个双向直方图。我希望信件沿着中心向下移动，并且统一数据向左移动，正常数据向右移动。这可以类似于你可以在ggplot2中生成的双向条形图，但我希望它们明显地分开，字母沿着'脊柱'向下。添加颜色和其他各种方向将是一个加分，但是一旦我得到适当的框架，我就可以解决这个问题

Answer 1

你没有给我们太多的帮助，但也许这与你的想法很接近？

dat <- data.frame(
  letters, 
  unif=runif(length(letters)), 
  norm=rnorm(length(letters))^2)

par(mar=c(3, 1, 0, 1.5), cex=1, mfrow=c(1, 2))

bplt <- barplot(-dat[[2]], horiz=TRUE, xaxt="n")

axis(1, -seq(0, max(dat[[2]]), length.out=5), 
   round(seq(0, max(dat[[2]]), length.out=5), 2), cex.axis=0.8)
axis(4, bplt, dat[[1]], lty=0, las=1, cex.axis=0.8)

barplot(dat[[3]], horiz=TRUE, cex.axis=0.8)

这种类型的情节在人口统计学领域是众所周知的，它通常被称为“金字塔情节”。如果您四处搜索，我相信您会找到更高级的解决方案。