Ошибка в функции reorder () в R ggplot, объект не найден
Это точная ошибка, которую я получаю - Ошибка при переупорядочении (Страна, Средняя_показатель_клиента, среднее значение): объект «Страна» не найден. Вдобавок: Предупреждающее сообщение: Попытка выполнить расчет с помощью group_by(), но расчет не удался. Возврат к разгруппированной работе фильтра ...
Код ниже и 1-й фрагмент, то есть до тех пор, пока функция суммирования не будет работать нормально, поэтому проблема заключается в строке aes (reorder ()) и является новой для R, я не могу понять. Пожалуйста помоги.
literacy_data %>%
filter(Gender=="female") %>%
group_by(Country) %>%
filter(max(Year)==2018 & n_distinct(Year)>=5, mean(literacy_data$'Literacy rate'[Year==2018],na.rm = T)>mean(literacy_data$'Literacy rate'[Year!=2018],na.rm = T)) %>%
group_by(Country,Year) %>%
summarise(Average_literacy_rate = mean(literacy_data$'Literacy rate',na.rm = T), .groups = 'drop') %>%
ggplot(aes(reorder(Country, Average_literacy_rate, mean), Average_literacy_rate, color=as.factor(Year)))+
geom_point(size=9,alpha=0.4)+
coord_flip()+
gghighlight(Year==2018)+
scale_y_percent()+
scale_color_manual(values = c("2018"="firebrick"))+
theme_minimal()+
labs(x=NULL,y=NULL,title = "Countries that had peak average literacy rate in <span style='color:firebrick'>**2018**</span>",
color=NULL)+
theme_ipsum_ps()+
theme(plot.title = element_markdown(size=20,margin = margin(b = 10)))
1 ответ
Ваш синтаксис кажется неправильным ...
Пытаться :
ggplot(literacy_data, aes(x = reorder(Country, Average_literacy_rate), y ...
или же
ggplot(literacy_data, aes(reorder(Country, Average_literacy_rate)) ...