R 그래프 : Confidence Interval Graph 그리기

[sl100104]

아래와 같이 고수들이 만든 Confidence interval을 그림을 모았다. 나에겐 논문에 사용될 매우 유용한 그래프다.  

http://stackoverflow.com/questions/14069629/plotting-confidence-intervals

내가 몇시간에 걸쳐 ggplot2로 만든 그래프다 

library("ggplot2")

qplot(df$x, df$F, data=df, geom="line", color = "test stat",

main = "How does orange tree circumference vary with age?")

ggplot(df, aes(x, y = value, color = variable)) + 

    geom_point(aes(y = df$F, col = "stat"),colour = "darkmagenta", size = 1.5) + 

    #geom_line(aes(y = df$F, col = "stat"),colour = "black", size = 0.1) + 

    geom_line(aes(y = df$L, col = "Lower"),colour = "orangered2", size = 0.1) +

    geom_line(aes(y = df$U, col = "Upper"),colour = "orangered2", size = 0.1)