Блог

У меня есть следующий фрейм данных:

 df <- data.frame(
  time = factor(c(1, 1, 2, 2)),
  value = c(1, 5, 3, 4),
  group = factor(c(1, 2, 1, 2)),
  upper = c(1.1, 5.3, 3.3, 4.2),
  lower = c(0.8, 4.6, 2.4, 3.6)
)
 

Я хочу отобразить столбец «значение» в виде строки, а затем область, которая проходит «под», минимальная точка которой находится ниже, а максимальная точка — выше.

Пока у меня есть это:

 ggplot(df, aes(time, value, colour = group))  
  geom_line(aes(group = group))  
  geom_errorbar(aes(ymin = lower, ymax = upper), width = 0.2)
 

Но мне нужна не панель ошибок, а область, например:

geom_ribbon() Функция должна обеспечить желаемый результат.

 df <- data.frame(
   time = factor(c(1, 1, 2, 2)),
   value = c(1, 5, 3, 4),
   group = factor(c(1, 2, 1, 2)),
   upper = c(1.1, 5.3, 3.3, 4.2),
   lower = c(0.8, 4.6, 2.4, 3.6))

g<-ggplot(df, aes(time, value, colour = group, group = group))  
   geom_line()  
   geom_errorbar(aes(ymin = lower, ymax = upper), width = 0.2)  
   geom_ribbon(aes(ymin=lower, ymax=upper, fill = group), alpha=0.5)

print(g)