ggplot2特別な変数を並べ替える.count

Question

こんにちは私はここにこのプロットがあるとします。

Fruit <- c(rep("Apple",3),rep("Orange",25), rep("Peach",5) ) 


df <- data.frame(Fruit) 

ggplot(df, aes(Fruit, ..count..)) + geom_bar(aes(fill = Fruit), position = "dodge") 

このコードは

が生成されますが、私が本当に欲しいものオレンジ桃による最初のフォローになるように降順でソートすることです。私は頻度テーブルを生成し、レベルソートされた要因を作成することができますが、私は、とにかくこれは特別な変数自体の中でこれを行うには不思議です。

ありがとうございました！

Answer 1

私は、forcatsパッケージを使用して、その頻度に従って因子レベルを最初に並べ替えることをお勧めします。あなたのプロットコードは同じままにすることができますし、あなたが望むものを得る必要があります。

library(forcats) 
df$Fruit <- fct_infreq(df$Fruit) 

ggplot(df, aes(Fruit, ..count..)) + 
    geom_bar(aes(fill = Fruit), position = "dodge")