странная ошибка: объект 'x' не найден в ggplot

Question

Я обнаружил очень странную ошибку в ggplot. Мне удалось объединить stat_ecdf и geom_point (только для определенных процентилей). После того, как я собрал весь код, он показывает

"Error in FUN(X[[i]], ...) : object 'Source of water' not found. 

Это код

wq_tr_nona<-wq_tr%>%
  filter(!is.na(pH))

per.tile<-c(0.10,0.25,0.50,0.75,0.90)
tile_pH<-data.frame(x=quantile(wq_tr_nona$pH, per.tile),
              y=per.tile)

wq_tr_nona%>%
      ggplot(aes(pH,colour=`Source of water`))+
      geom_line(stat = "ecdf")+
      geom_vline(xintercept = 8,linetype="dashed")+ 
      geom_point(data=tile_pH,aes(x=x, y=y))+ 
      theme(text = element_text(size = 16, family = "serif"),
            legend.position="none",
            legend.title=element_blank())+
      scale_y_continuous(labels = function(x) paste0(sprintf("%1.0f", x*100),"%"))+ #making decimal to percent
      theme_classic()

, затем я вырезал строку geom_point

geom_point(data=tile_pH,aes(x=x, y=y))+

Я показываю хорошо сюжет без какого-либо сообщения. Кто-нибудь здесь знает проблему? Спасибо