У меня есть данные с названиями стран, континента, года и некоторыми переменными показателями благосостояния.
country year infant_mortality life_expectancy fertility population
1 Albania 1960 115.40 62.87 6.19 1636054
2 Algeria 1960 148.20 47.50 7.65 11124892
3 Angola 1960 208.00 35.98 7.32 5270844
4 Antigua and Barbuda 1960 NA 62.97 4.43 54681
5 Argentina 1960 59.87 65.39 3.11 20619075
6 Armenia 1960 NA 66.86 4.55 1867396
gdp continent region
1 NA Europe Southern Europe
2 13828152297 Africa Northern Africa
3 NA Africa Middle Africa
4 NA Americas Caribbean
5 108322326649 Americas South America
6 NA Asia Western Asia
Я хотел бы построить график ожидаемой продолжительности жизни для каждой африканской страны в 1970 и 2010 годах и изменить порядокстолбцы для каждого года в порядке возрастания: идея состоит в том, чтобы увидеть, произошло ли изменение в рейтинге.
Это то, что я сделал.
gapminder %>% dplyr::filter(continent %in% "Africa" & year %in% c(1970, 2010)) %>%
mutate(country = reorder(country, life_expectancy, FUN = median)) %>%
ggplot(aes(x= country, y = life_expectancy, fill = region)) +
geom_col() +
facet_grid(.~year) +
theme(axis.text.x = element_text(angle = 90, hjust =1), legend.position = "none")
Как я могу повторнозаказать уровни фактора для каждого аспекта?