r - 调整 R 直方图中的 x 轴

Question

这个直方图真的很丑：

hist(rbinom(10000, 20000, 0.0001),freq=F,right=F)

我不希望我的酒吧之间有空格。我尝试了不同的breaks=方法，但它们都产生了相似的结果。有任何想法吗？

我还希望将每个 bin 值（或平均值）打印在条形图的中心下方。

Answer 1

这是一种使标签居中的方法：

x <- rbinom(1000, 2000, 0.001)
tmp <- hist(x, breaks=0:(max(x)+1), xaxt="n", right=FALSE, freq=FALSE)
axis(1, at=tmp$mids, labels=0:max(x))

Answer 2

如果这些值是整数并且您只想计算它们，那么怎么样

barplot(table(rbinom(10000, 20000, 0.0001)))

Answer 3

在这种情况下，我通常使用：

 hist(rbinom(1000,2000,0.0001),breaks=function(x) length(unique(x)))

Answer 4

还：

x <- rbinom(10000, 20000, 0.0001)
hist(x, br = seq(-0.01, max(x)+1, 1), freq=F, col="black")

（col="black"当然不是必须的，我只是觉得黑色更易读！）