订购 geom_bar() 没有任何定义的变量

Question

当y只是x的计数时，有没有办法在geom_bar()对条形进行geom_bar() ？

例子：

ggplot(dat) +
  geom_bar(aes(x = feature_1)) 

我尝试使用reorder()但它需要在aes()定义一个y变量。

Answer 1

组成数据：

dfexmpl <- data.frame(stringsAsFactors = FALSE,
         group = c("a","a","a","a","a","a",
                   "a","a","a","b","b","b","b","b","b","b","b","b",
                   "b","b","b","b","b","b"))

绘图代码 - 重新排序正在执行按计数排列的工作：

dfexmpl %>%
group_by(group) %>%
mutate(count = n()) %>%
ggplot(aes(x = reorder(group, -count), y = count)) +
geom_bar(stat = "identity")

结果是：