1

カラーブリューワーを使用して連続値でボックスプロットを埋めることができないようです。ボックスのアウトラインを連続値に基づいて調整できるため、どこかで構文を単純に交換する必要があることはわかっています。私が扱っているデータは次のとおりです。

data <- data.frame(
    value = sample(1:50),
    animals = sample(c("cat","dog","zebra"), 50, replace = TRUE),
    region = sample(c("forest","desert","tundra"), 50, replace = TRUE)
)

各ボックスの色の塗りつぶしの深さが「値」で増加するように、中央値の「値」で並べ替えられたパネル化された箱ひげ図を作成したい(これは冗長であることはわかっていますが、例のために我慢してください)

(データの注文):

orderindex <- order(as.numeric(by(data$value, data$animals, median)))
data$animals <- ordered(data$animals, levels=levels(data$animals)[orderindex])

パネルで箱ひげ図を作成すると、アウトラインの色を調整できます。

library(ggplot2)
first <- qplot(animals, value, data = data, colour=animals)
second <- first + geom_boxplot() + facet_grid(~region)
third <- second + scale_colour_brewer()
print(third)

しかし、アウトラインに対して行ったことを実行したいのですが、代わりに各ボックスを塗りつぶします(「値」が増加するにつれて各ボックスが暗くなります)。geom_boxplot の審美的な引数内に「scale_colour_brewer()」引数を入れることの問題かもしれないと思いました。

second <- first + geom_boxplot(aes(scale_colour_brewer())) + facet_grid(~region)

しかし、それはうまくいかないようです。この「scale_colour_brewer」引数の配置の問題であることはわかっています。私はそれがどこに行くのか分かりません!

(ここに同様の質問がありますが、ボックスの色はスペクトル/勾配に沿って連続値で増加しないため、私が探しているものとはまったく異なります。これらの値は基本的に要因のようです:色を追加するboxplot - 「離散スケールに供給される連続値」エラー、および車のパッケージを含む ggplot サイトの例: http://docs.ggplot2.org/0.9.3.1/geom_boxplot.htmlを設定すると動作しないようです"fill" から "value" ... エラーが表示されます: Error in unit(tic_pos.c, "mm") : 'x' and 'units' must have length > 0) )

4

1 に答える 1