この投稿の情報を使用して、対数目盛のヒストグラムを作成しました:対数目盛の ヒストグラム
ただし、plotからの出力は、histからの出力とはまったく異なります。プロットからの出力を履歴からの出力に似せるように構成する方法を知っている人はいますか?助けてくれてありがとう。
リンクされた回答の簡略化された再現可能なバージョンは次のとおりです。
x <- rlnorm(1000)
hx <- hist(x, plot=FALSE)
plot(hx$counts, type="h", log="y", lwd=10, lend="square")
軸をより「歴史的な」外観にするには、最後の行を次のように置き換えます。
plot(hx$counts, type="h", log="y", lwd=10, lend="square", axes = FALSE)
Axis(side=1)
Axis(side=2)
この方法を使用すると、バーを結合するのは悪夢になります。の値を使用して試行錯誤を行うことをお勧めしますlwd
(この例では、34は見栄えがよくなります)、またはまたはの使用法を学習しlattice
ますggplot
。
編集:バーは実際には長方形ではなく、太い線であるため、境界線の色を設定することはできません。上に少し細い線を引くことで、ボーダー効果を偽造することができます。更新されたコードは
par(lend="square")
bordercol <- "blue"
fillcol <- "pink"
linewidth <- 24
plot(hx$counts, type="h", log="y", lwd=linewidth, col=bordercol, axes = FALSE)
lines(hx$counts, type="h", lwd=linewidth-2, col=fillcol)
Axis(side=1)
Axis(side=2)
ggplot2を使用するのはどうですか?
x <- rnorm(1000)
qplot(x) + scale_y_log10()
しかし、私は、対数目盛のヒストグラムを持つことは私には奇妙に思えるという他の投稿に対するハドリーのコメントに同意します=)。