调整R直方图中的x轴

Question

这个直方图非常难看：

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

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

我还希望每个bin值（或平均值）打印在其栏的 center 下。

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"不是必需的，当然，我发现它在黑色中更易于改造！）