调整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" ，我只是发现它更容易阅读为黑色！）