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")