指南中和翻转条形图轴上的因素的顺序水平
Order levels of a factor in a guide and on the axis of a flipped barchart
您好：有没有办法修改下面的图，使因子 'C' 显示在顶部？即我希望（翻转的）y 轴上的因素顺序反映它们在图例中显示的顺序。
var1<-sample(c('A', 'B', 'C'), replace=T, size=100)
var2<-sample(c('apples', 'bananas'), replace=T, size=100)
var3<-rnorm(100, mean=100)
df<-data.frame(var1, var2, var3)
df %>%
mutate(var1=fct_reorder(var1, var3, mean)) %>%
ggplot(., aes(y=var1, x=var3, fill=var1))+facet_wrap(~var2)+geom_col()+scale_fill_grey()
您可以使用 scale_y_discrete(limits = rev) :
library(dplyr)
library(ggplot2)
library(forcats)
df %>%
mutate(var1=fct_reorder(var1, var3, mean)) %>%
ggplot(., aes(y=var1, x=var3, fill=var1)) +
facet_wrap(~var2)+
geom_col()+
scale_fill_grey() +
scale_y_discrete(limits = rev)
您好：有没有办法修改下面的图，使因子 'C' 显示在顶部？即我希望（翻转的）y 轴上的因素顺序反映它们在图例中显示的顺序。
var1<-sample(c('A', 'B', 'C'), replace=T, size=100)
var2<-sample(c('apples', 'bananas'), replace=T, size=100)
var3<-rnorm(100, mean=100)
df<-data.frame(var1, var2, var3)
df %>%
mutate(var1=fct_reorder(var1, var3, mean)) %>%
ggplot(., aes(y=var1, x=var3, fill=var1))+facet_wrap(~var2)+geom_col()+scale_fill_grey()
您可以使用 scale_y_discrete(limits = rev) :
library(dplyr)
library(ggplot2)
library(forcats)
df %>%
mutate(var1=fct_reorder(var1, var3, mean)) %>%
ggplot(., aes(y=var1, x=var3, fill=var1)) +
facet_wrap(~var2)+
geom_col()+
scale_fill_grey() +
scale_y_discrete(limits = rev)