このヒストグラムは本当に醜いです:
hist(rbinom(10000, 20000, 0.0001),freq=F,right=F)
バーの間にスペースを入れたくありません。さまざまな方法を試しbreaks=
ましたが、すべて同様の結果が得られます。何か案は?
また、各ビンの値 (または平均値) をバーの中央の下に印刷したいと考えています。
ラベルを中央に配置する方法は次のとおりです。
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))
値が整数で、単にそれらを数えたい場合はどうですか
barplot(table(rbinom(10000, 20000, 0.0001)))
そのような場合、私は通常次のように使用します。
hist(rbinom(1000,2000,0.0001),breaks=function(x) length(unique(x)))
また:
x <- rbinom(10000, 20000, 0.0001)
hist(x, br = seq(-0.01, max(x)+1, 1), freq=F, col="black")
(col="black"
もちろん必須ではありません。黒の方が読みやすいと思います!)