Построение доверительного интервала средств на ggplot

Question

У меня есть 10 различных испытаний (с каждым своим набором данных). Я уже нашел прогнозные значения, которые были взяты из модели и создали новый столбец с прогнозными значениями.

Я ограничил все значения x, y и предсказанный.y для каждого испытания в одном кадре данных на rbind()

Я хочу построить среднее значение всех значений y с одинаковыми значения х (из прогнозируемых значений), а также построить доверительный интервал, используя geom_ribbon, а не столбцы ошибок.

Я уже ссылался на эту ссылку: нанесение средних значений с доверительными интервалами с помощью ggplot , однако, когда я строю stat_summary(geom="ribbon", fun.data=mean_cl_normal, fun.args=list(conf.int=0.95), fill="lightblue"), ggplot ничего не строит, но также не приходит с любыми ошибками, поэтому я не уверен, что пошло не так.

Есть ли другой способ получить тот же результат с другим кодом? Или есть проблема с тем, как я ограничил свои значения и набор данных?

ДОПОЛНИТЕЛЬНАЯ ИНФОРМАЦИЯ

Это объединенные данные

y<dbl> x<dbl> predy<dbl>
0.300   83.69   0.3292044030        
0.312   83.69   0.3291121879        
0.324   83.69   0.3291012056        
0.330   83.69   0.3287549029        
0.330   83.61   0.3291187262        
0.335   83.57   0.3293862893        
0.334   83.36   0.3303592465        
0.329   82.79   0.3328754639        
0.324   82.55   0.3339801283        
0.323   82.92   0.3319657277        

Когда Я использовал код:

 ggplot(ASframe, aes(x=x, y=y))+
 stat_summary(geom="ribbon", fun.data=mean_cl_normal, fun.args=list(conf.int=0.95), fill="lightblue")+
  stat_summary(geom = "line", fun = mean, linetype = "dashed")+
  stat_summary(geom = "point", fun=mean, color= "red", alpha = I(0.5)) +
  ylim(-0.1, 0.6)

Результаты оказались:

Answer 1

Добро пожаловать на SO. Трудно ответить на вопрос без воспроизводимого примера { ссылка }. Я бы попробовал опцию geom_smooth. Вот воспроизводимый пример использования geom_smooth для построения доверительного интервала, который, как мы надеемся, поможет вам начать.

#plot for sepal length and petal length of setosa species
 ggplot(subset(iris, iris$Species=="setosa"),aes(Sepal.Length,Petal.Length))+
    geom_point(position="jitter")+
    geom_smooth()