繪製比值比和95％置信區間

Question

我想在R中創建一個圖，其中四個不同變量的比值比和它們的95％置信區間。我希望它看起來類似於下面的示例圖片：

上圖僅包含（b）圖片，因爲（a）圖片幾乎相似，我只想展示佈局。

我一直在網上搜索，但沒有發現任何看起來類似的東西。希望你能給我一些建議！

乾杯！

Answer 1

更多或更少的，與天然R：

### artificial data #### 
set.seed(321) 
bs<-sort(runif(20,-2,2)) 
sd<-runif(20,1,2) 
li1<-bs-2*sd 
li2<-bs+2*sd 
dat<-data.frame(li1,bs,li2) 
pos<-c(1:5,7:11,13:17,19:23) 
xl=range(dat) 
plot(1,type="n",xlim=xl,ylim=c(1,25),ylab="",frame.plot = F,yaxt = "n",xlab="lr") 
for (i in 1:length(dat[,1])){ 
    lines(dat[i,],rep(pos[i],3),lty=pos[i]%%6,pch="|",type = "b",cex = .5) 
} 
abline(v=0,lty=3) 
points(dat[,2],pos,pch="*",cex=.8) 
text(-2,pos[c(5,10,15,20)]+.95,paste("Text",1:4),cex=.8)