R：ggplot堆积条形图传奇颠倒

Question

我想画一个堆积的条形图：

df1 <- data.frame(sex       = factor(c("Female","Female","Male","Male")),
                 time       = factor(c("Lunch","Dinner","Lunch","Dinner"), levels=c("Lunch","Dinner")),
                 total_bill = c(13.53, 16.81, 16.24, 17.42))
# Stacked bar graph -- this is not what I want
ggplot(data=df1, aes(x=time, y=total_bill, fill=sex)) + geom_bar(stat="identity")

似乎是：

我希望右侧的性别传奇与左侧的堆叠顺序相对应，即底部为红色，顶部为蓝色，我该怎么做？

Answer 1

试试这个：

ggplot(data=df1, aes(x=time, y=total_bill, fill=sex)) + 
geom_bar(stat="identity") + 
scale_fill_discrete(breaks=c("Male","Female"))

为我工作

Answer 2

你也可以添加其中任何一个（它们是等效的）：

guides(fill = guide_legend(reverse=TRUE))
scale_fill_discrete(guide = guide_legend(reverse=TRUE))

来自Cookbook for R Graphics