ggplot 系数为 95%CI,按组

ggplot the coef with 95%CI, by group

我想使用 ggplot 绘制空气污染物与出生体重变化 (95%CI) 的关联结果。

我的数据格式是这样的

variable    exposure period      coef    coef_lb      coef_ub
PM10        entire pregnancy    -27.6      -49.2         -3.8
SO2         entire pregnancy       40       14.2         62.8
NO          entire pregnancy      -26        -44         -6.4
NO2         entire pregnancy        0        -20           19
PM10        trimester1          -29.4      -49.4           -8
SO2         trimester1             12         -9         31.8
NO          trimester1            5.2      -15.2         28.2
NO2         trimester1           -2.2        -23         16.6
PM10        trimester2          -11.8      -35.2         11.2
SO2         trimester2           26.2          2         51.4
NO          trimester2          -10.8      -35.2         12.4
NO2         trimester2           -7.4      -27.8         14.6
PM10        trimester3            6.2      -17.6         28.2
SO2         trimester3            0.6        -19         22.4
NO          trimester3            -24        -43         -5.4
NO2         trimester3              7      -11.4         26.8

我有四种空气污染物,暴露期是trimester-specific,我有系数,95%的下限和上限CI。

我想绘制如下图,有人可以帮忙吗?

#get the data.frame
data <- read.table("DATA.csv",header=T,sep=";")

require(ggplot2)

#build and plot ggplot object
g <- ggplot(data=data,aes(x=exposureperiod,y=coef))
g <- g + facet_grid(.~variable)
g <- g + geom_errorbar(aes(ymin=coef_lb,ymax=coef_ub))
g