我有以下代码可以正常工作:
唯一的问题是填充按字母顺序排序,而不是按条形排列的比例排序。结果我得到了较大部分的酒吧看起来颜色相似,巧合。
我尝试使用BacArena包中的colpal3来确保它们的对比度很好,但有一些颜色看起来仍然相似。
看起来像是根据条形图(从最大到最小)的大小来排列图例,因为列表中的相似颜色会进一步下降。
我查了一下人们通过“order = C(...)”手动订购的地方,但我正在寻找一种方法来做同样的事情,但是使用(大概)每个“SimpleBusinessArea”的总y值。
虚拟数据:
ggplot(SinceAprilNoZeros, aes(x=MonthClosed, y=Total.Redress.Value, group=SimpleBusinessArea, fill=SimpleBusinessArea)) +
facet_wrap(~Subject.Category) +
geom_bar(stat='summary', fun.y=sum, size = 2) +
labs( title="Redress Paid by Subject Category", x="Category", y="Redress") +
scale_y_continuous(labels=dollar_format(prefix = "£")) +
theme_classic()+
scale_color_discrete(guide=guide_legend(ncol=1))+
scale_fill_manual(values = colpal3)+
theme(axis.text.x=element_text(angle=25,hjust=1,vjust=0.9), axis.title.x = element_blank(), plot.margin = unit(c(0.2,0.2,0.5,0.2), "cm"))
在虚拟数据上使用此代码:
1 - 黄色 - Area1
2 - 紫色 - Area2
3 - 橙色 - Area3
我希望它是:
1 - 黄色 - Area3(y的最大总和)
2 - 紫色 - Area1(y的第2大和)
3 - 橙色 - Area2(y的最小和)