Ошибка в функции 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)) ...
Другие вопросы по тегам