1

ボンジュールオール、

ボックスプロットで散布図にラベルを付けるための解決策を見つけるのに助けが必要です。

以下に示すように、2 つのデータがあります。1 つ目はすべての大宇宙のデータで、2 つ目は各大宇宙の平均です。

Tab1 // クエリ結果

      1       2       3       4       5       6
1   13.2089 13.3161 13.2497 13.2268 13.2209 11.6036
2   13.2923 13.3869 13.2950 13.2876 13.2922 11.7044
3   13.4493 13.5394 13.4450 13.4735 13.4689 11.9483


1を意味します 15.43801 15.38659 15.23252 15.50707 15.67684 15.25383

私の問題は、グラフ2の各ポイントにラベルを表示する方法です。各ポイントに no.macrocosme のラベルを付けたいと思います。

これは私の小さなコードです:

#Macrocosme
Mac = svalue(cbMacro)

#Add boxplots to all Macs
par(mfrow = c(1, 2))
boxplot(Tab1, main="Temperature of Macrocosme", xlab="No. Macrocosme", ylab="Temperature in Celcius", col=(c("gold","darkgreen")),ylim=range(c(min(vmin),max(vmax))))
points(1:length(Mac), means,pch = 22)

#Add boxplots to a median of all Macs
boxplot(means, main="Mean Temperature of all the Macrocosme", xlab="Mean", ylab="Temperature in Celcius")
with(Tab1, stripchart(means, method="jitter", vertical=TRUE, add=TRUE, col="red",pch = 20))

関数 text() を試してみました --> 散布図ではなく箱ひげ図に数​​値を表示し、パッケージ textxy() --> 何も表示しません

x、yの値を決定するときに問題があると思います..うーん..グラフ内の各箱ひげ図の要約（中央値、Q1 -Q3）を表示することは可能ですか？

これは私が作成したグラフです: 以下に示すように、2 つのグラフがあり、右側は平均値を含むすべての大宇宙の箱ひげ図であり、左側はすべての平均大宇宙の散布図を含む箱ひげ図です。

箱ひげ図を使用したマイ グラフと、1 次元散布図を使用したすべての箱ひげ図の平均 あなたの助けの前にありがとう..

よろしく、

ユギズ

4

1 に答える 1

1

テキスト関数が機能するはずです。例えば、

R> x = rnorm(10)
R> boxplot(x, ylim=c(-3, 3))
R> text(1, 1, "Hi", col=2)

あなたの例では、次のようなものを試してください：

text(1, means, LETTERS[length(means)], col=2)

これにより、赤い点に文字が表示されます。ただし、ストリップ チャート関数の呼び出しでは、ポイントを「ジッタリング」または「ウィグル」しています。いくつかのポイントしかないので、それらをジッターしないでください (おそらくメソッド引数を省略します)。次のように動作するはずです。

text(1.3, means, LETTERS[length(means)], col=2)
于 2012-04-03T12:51:21.657 に答える