修订版 | aa29b94b4c79b5252e9b51e02173679ad72f50ba (tree) |
---|---|
时间 | 2022-03-29 23:22:40 |
作者 | Lorenzo Isella <lorenzo.isella@gmai...> |
Commiter | Lorenzo Isella |
I fixed the latest plot.
@@ -227,7 +227,9 @@ | ||
227 | 227 | ms_covid_percentage |
228 | 228 | ) , names_to= "country", values_to="covid_percentage" ) %>% |
229 | 229 | mutate(ll=format_col(covid_percentage*100,1)) %>% |
230 | - mutate(ll=paste(ll, "%", sep="")) | |
230 | + mutate(ll=paste(ll, "%", sep="")) %>% | |
231 | + arrange(country) %>% | |
232 | + mutate(country=fct_inorder(country)) | |
231 | 233 | |
232 | 234 | |
233 | 235 |
@@ -580,7 +582,7 @@ | ||
580 | 582 | coord_cartesian(xlim = c(0, 1)) + |
581 | 583 | my_ggplot_theme2("top")+ |
582 | 584 | scale_x_continuous(labels = label_percent())+ |
583 | - scale_y_discrete(labels =c(ms3,"EU27") )+ | |
585 | + scale_y_discrete(labels =c("EU27", ms3) )+ | |
584 | 586 | xlab("Share of Covid19 State Aid Expenditure")+ |
585 | 587 | ylab(NULL) |
586 | 588 |