web-dev-qa-db-ja.com

ggplot2 geom_bar内の塗りつぶし色をどのように注文しますか

Ggplot関数を呼び出しています

ggplot(data,aes(x,y,fill=category)+geom_bar(stat="identity")

結果は、カテゴリに対応するさまざまな色で塗りつぶされたバーを持つ棒グラフです。ただし、バーの色の順序は一貫していません。ピンク、緑、青があるとしましょう。下から上にピンク、緑、青になるバーもあれば、緑、ピンク、青になるバーもあります。明らかなパターンは見当たりません。

これらの順序はどのように選択されますか?どうすれば変更できますか?少なくとも、どうすればggplotに一貫した順序を選択させることができますか?

(x、yおよびcategory)のクラスは、それぞれ(整数、数値、および係数)です。カテゴリを順序付けられた要素にすると、この動作は変わりません。

誰でもこれを修正する方法を知っていますか?

再現可能な例:

dput(data)

structure(list(mon = c(9L, 10L, 11L, 10L, 8L, 7L, 7L, 11L, 9L, 
10L, 12L, 11L, 7L, 12L, 8L, 12L, 9L, 7L, 9L, 10L, 10L, 8L, 12L, 
7L, 11L, 10L, 8L, 7L, 11L, 12L, 12L, 9L, 9L, 7L, 7L, 12L, 12L, 
9L, 9L, 8L), gclass = structure(c(9L, 1L, 8L, 6L, 4L, 4L, 3L, 
6L, 2L, 4L, 1L, 1L, 5L, 7L, 1L, 6L, 8L, 6L, 4L, 7L, 8L, 7L, 9L, 
8L, 3L, 5L, 9L, 2L, 7L, 3L, 5L, 5L, 7L, 7L, 9L, 2L, 4L, 1L, 3L, 
8L), .Label = c("Down-Down", "Down-Stable", "Down-Up", "Stable-Down", 
"Stable-Stable", "Stable-Up", "Up-Down", "Up-Stable", "Up-Up"
), class = c("ordered", "factor")), NG = c(222614.67, 9998.17, 
351162.2, 37357.95, 4140.48, 1878.57, 553.86, 40012.25, 766.52, 
15733.36, 90676.2, 45000.29, 0, 375699.84, 2424.21, 93094.21, 
120547.69, 291.33, 1536.38, 167352.21, 160347.01, 26851.47, 725689.06, 
4500.55, 10644.54, 75132.98, 42676.41, 267.65, 392277.64, 33854.26, 
384754.67, 7195.93, 88974.2, 20665.79, 7185.69, 45059.64, 60576.96, 
3564.53, 1262.39, 9394.15)), .Names = c("mon", "gclass", "NG"
), row.names = c(NA, -40L), class = "data.frame") 

ggplot(data,aes(mon,NG,fill=gclass))+geom_bar(stat="identity")
36
Dave31415

order美観も指定する必要があります。

ggplot(data,aes(mon,NG,fill=gclass,order=gclass))+
    geom_bar(stat="identity")

enter image description here

これは bug である場合とそうでない場合があります。

23
Brian Diggs

Ggplot2_2.0.0からは、orderの外観は使用できなくなりました。塗りつぶし色で並べ替えられたスタックを使用してグラフを取得するには、並べ替えるグループ化変数でデータセットを並べ替えます。

このために、dplyrarrangeをよく使用します。ここでは、順序付けされたデータセットを作成するのではなく、fill呼び出し内のggplot係数でデータセットを順序付けしていますが、どちらも正常に機能します。

_library(dplyr)

ggplot(arrange(data, gclass), aes(mon, NG, fill = gclass)) +
    geom_bar(stat = "identity")
_

もちろん、これは、抽出ブラケットを含む古典的なorderを使用して、ベースRで簡単に実行できます。

_ggplot(data[order(data$gclass), ], aes(mon, NG, fill = gclass)) +
    geom_bar(stat = "identity")
_

両方のケースで結果のプロットが望ましい順序になりました: enter image description here

ggplot2_2.2.0 update

Ggplot_2.2.0では、充填順序は因子レベルの順序に基づいています。デフォルトの順序では、一番下ではなく、スタックのtopに最初のレベルがプロットされます。

スタックの一番下にある最初のレベルが必要な場合は、_reverse = TRUE_で_position_stack_を使用できます。 geom_bar(stat = "identity")のショートカットとして_geom_col_を使用することもできます。

_ggplot(data, aes(mon, NG, fill = gclass)) +
    geom_col(position = position_stack(reverse = TRUE))
_
49
aosmith

注文するには、levelsパラメーターを使用して注文を通知する必要があります。このような:

data$gclass
(data$gclass2 <- factor(data$gclass,levels=sample(levels(data$gclass)))) # Look the difference in the factors order
ggplot(data,aes(mon,NG,fill=gclass2))+geom_bar(stat="identity")
5
Rcoster

scale_fill_関数を使用して色を変更できます。例えば:

ggplot(dd,aes(mon,NG,fill=gclass)) + 
  geom_bar(stat="identity") + 
  scale_fill_brewer(palette="blues")

barsで一貫した順序を取得するには、データフレームを順序付ける必要があります。

dd = dd[with(dd, order(gclass, -NG)), ]

凡例の順序を変更するには、gclassファクターを変更します。のようなもの:

dd$gclass= factor(dd$gclass,levels=sort(levels(dd$gclass), TRUE))

enter image description here

4
csgillespie