1

このヒストグラムは本当に醜いです:

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

バーの間にスペースを入れたくありません。さまざまな方法を試しbreaks=ましたが、すべて同様の結果が得られます。何か案は?

また、各ビンの値 (または平均値) をバーの中央の下に印刷したいと考えています。

4

4 に答える 4

6

ラベルを中央に配置する方法は次のとおりです。

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))
于 2010-08-16T13:00:20.170 に答える
4

値が整数で、単にそれらを数えたい場合はどうですか

barplot(table(rbinom(10000, 20000, 0.0001)))
于 2010-08-16T08:03:56.777 に答える
2

そのような場合、私は通常次のように使用します。

 hist(rbinom(1000,2000,0.0001),breaks=function(x) length(unique(x)))
于 2010-08-16T08:58:51.390 に答える
0

また:

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

(col="black"もちろん必須ではありません。黒の方が読みやすいと思います!)

于 2010-08-16T13:30:55.120 に答える