R：使用“segment”命令在绘制点之间放置垂直线

I have a small dataframe from which I am plotting 3 columns in order to display a risk estimate and the 95% confidence intervals. Right now I have those 3 sets of vectors displayed as points, but I would like to connect them using "segment". I have a small dataframe from which I am plotti