5

バープロットの x 軸と関連する目盛りを再配置/オフセットしたいと思います。これは簡単なはずですが、答えを見つけるのに苦労しています。以下は、24 カテゴリのデータの例です。

xval = c(1:24)
count = c(0.03,0.03,0.08,0.06,0.11,0.4,0.3,0.5,0.5,0.6,0.4,0.1,0.1,0.4,0.2,0.1,0.06,0.05,0.03,0.02,0.01,0.03,0.01,0.02)
df = as.data.frame(cbind(xval, count))

以下のコードを使用して、バーの中点に目盛りを揃えた棒グラフを簡単に作成できます。

mp <- barplot(df$count, space=0, axes=FALSE) 
axis(side=2, pos=-0.2)
axis(side=1, at =mp, labels=df$xval)

以下を使用して、x 軸全体 (ラベルと目盛り) をシフトしてバーの外側に揃えることもできます (ただし、これは最後のバーを軸に組み込むことができません)。

axis(side=1, at =mp-0.5, labels=df$xval)

X 軸と関連する目盛りをバーの境界 (つまり、バーの中央ではなく両側の目盛り) に揃えたいのですが、X 軸のラベルはバーの中点にとどめておきたいです。 . これを達成する簡単な方法はありますか？

4

1 に答える 1

7

これはあなたが探しているものですか？

# create positions for tick marks, one more than number of bars
at_tick <- seq_len(length(count) + 1)

# plot without axes
barplot(count, space = 0, axes = FALSE) 

# add y-axis
axis(side = 2, pos = -0.2)

# add x-axis with offset positions, with ticks, but without labels.
axis(side = 1, at = at_tick - 1, labels = FALSE)

# add x-axis with centered position, with labels, but without ticks.
axis(side = 1, at = seq_along(count) - 0.5, tick = FALSE, labels = xval)

ここに画像の説明を入力

于 2013-10-28T15:25:55.270 に答える