基础R绘制散点图时均值参考线无法显示的问题排查

你的代码存在两处关键问题，导致均值线无法显示：

1. 语法逻辑错误：plot函数未闭合括号，还错误地把points、abline嵌套到plot的main参数里——main是用来设置图表标题的，不能放绘图函数，这直接打乱了绘图流程。
2. 参数对应错误：abline(v=...)是画垂直于x轴的线，应该对应x的均值；abline(h=...)是画平行于x轴的水平线，应该对应y的均值，你搞反了两者的均值来源。

修正后的完整代码如下（包含模拟数据，方便直接运行）：

# 模拟示例数据（实际使用时替换成你的x、y数据）
x <- rnorm(50, mean=80, sd=15)
y <- rnorm(50, mean=120, sd=20)

# 绘制基础散点图，正确设置标题
plot(x, y, axes=TRUE, pch=16, xlim=c(40,120), main="带均值线的散点图")

# 单独添加蓝色点
points(46, 150, col="blue", pch=16)

# 添加x均值的垂直虚线（v对应x轴）
abline(v=mean(x), lty=2, lwd=4, col="red")

# 添加y均值的水平虚线（h对应y轴）
abline(h=mean(y), lty=2, lwd=4, col="red")

修正说明： #

• 拆分绘图步骤：先画散点图，再单独添加蓝色点、均值线，每个函数独立调用。
• 纠正abline参数：垂直中线用v=mean(x)，水平中线用h=mean(y)。
• 给均值线添加颜色（比如红色），能让它在散点中更醒目，也可以根据需求调整颜色、线宽（lwd）、线型（lty）。

内容的提问来源于stack exchange，提问作者Apharlef