在图形（R）上的单个点上添加水平误差线

Question

我使用

绘制了一个图表

plot(data.exoplanets$loga, data.exoplanets$logMass, ylab="Log of Mass", xlab="Log of Semi Major Axis")

使用

突出显示单个点

points(data.exoplanets$loga[1535], data.exoplanets$logMass[1535], col="red", pch=19)

并使用它来生成一组垂直误差条，其中KepError是错误。

lines(rep(data.exoplanets$loga[1535],2), c(data.exoplanets$loga[1535]-KepError, data.exoplanets$loga[1535]+KepError), col="red", type="o", pch="_")

如何调整此项以给出x轴的水平误差条？

Answer 1

这将产生x轴误差条。

lines(c(data.exoplanets$loga[1535]-xerr,data.exoplanets$loga[1535]+xerr),
rep(data.exoplanets$logMass[1535],2), col="red", type="o", pch="|")