ggplot2簇状柱图如何按降序排列

是 否 +2 论坛币

k人 参与回答

经管之家送您一份

应届毕业生专属福利!

求职就业群

赵安豆老师微信：zhaoandou666

经管之家联合CDA

送您一个全额奖学金名额~ !

立即领取

感谢您参与论坛问题回答

经管之家送您两个论坛币！

+2 论坛币

c	m	n
Sweden	2014	454088
Nordic countries	2014	46019
European countries	2014	25068
Other countries	2014	17100
Sweden	2015	485509
Nordic countries	2015	44467
European countries	2015	26994
Other countries	2015	14261
Sweden	2016	542091
Nordic countries	2016	51562
European countries	2016	33767
Other countries	2016	16360
Sweden	2017	560829
Nordic countries	2017	56723
European countries	2017	34139
Other countries	2017	23839
Sweden	2018	548372
Nordic countries	2018	56441
European countries	2018	44513
Other countries	2018	34174

数据表如图，代码如下：

ggplot(summary,aes(x=m,y=n,fill=c,label=n))+
  geom_bar(stat="identity",position="dodge")+
  theme_wsj(color="white")+
  scale_fill_wsj("rgby", "")+
  scale_y_continuous(breaks = seq(50000,800000,100000))+
  theme(axis.ticks.length=unit(0.5,'cm'))+
  guides(fill=guide_legend(title=NULL))+
  theme(axis.title = element_blank())
  geom_text(aes(y = n + 0.05), position = position_dodge(0.9), vjust = -0.5)


数据出图如下，问题是，如何将柱图在每年内按降序排列？

扫码加我 拉你入群

请注明：姓名-公司-职位

以便审核进群资格，未注明则拒绝

分享0 收藏1 回帖

关键词：ggplot2 gplot plot 降序排列 GPL

1. summary %>%
   
2.     mutate(c = factor(c, levels = c("Sweden", "Nordic countries", "European countries", "Other countries"))) %>%
   
3.     ggplot(aes(x = m, y = n, fill = c))+
   
4.     geom_bar(stat="identity", position="dodge")+
   
5.     theme_wsj(color="white")+
   
6.     scale_fill_wsj("rgby", "")+
   
7.     scale_y_continuous(breaks = seq(50000,800000,100000))+
   
8.     theme(axis.ticks.length=unit(0.5,'cm'))+
   
9.     guides(fill=guide_legend(title=NULL))+
   
10.     theme(axis.title = element_blank()) +
    
11.     geom_text(aes(y = n + 0.05, label = paste0(round(n / 1e3, 1), "K")), position = position_dodge(0.9), vjust = -0.5)

复制代码