R语言base绘图中如何为线性回归拟合线添加自定义颜色

直接在abline()函数中添加col参数即可指定拟合线颜色，参数支持传入颜色名称、十六进制色值、颜色序号三类取值，修改后的示例代码如下：

library(MASS) # 需先加载MASS包才能调用Boston数据集
# 绘制散点图（和你原有代码完全一致）
plot(Boston$crim, Boston$medv, main = "SÜ of hv and cr",
     xlab = "cr", ylab = "mhv")
# 构建线性回归模型
m <- lm(medv ~ crim, data = Boston) # 这里也可以改用data参数简化写法，和你原有写法效果一致
# 添加自定义颜色的拟合线
abline(m, col = "blue") # 蓝色拟合线

如果你需要切换其他颜色，直接修改col参数的取值即可：

• 红色拟合线：abline(m, col = "red")
• 绿色拟合线：abline(m, col = "green")
• 自定义十六进制色值（比如暖橙色）：abline(m, col = "#FF7F50")

你还可以搭配额外参数调整线条效果：

• 调整线条粗细：添加lwd参数，例如abline(m, col = "blue", lwd = 2)代表2倍粗的蓝色线条
• 调整线条样式：添加lty参数，例如abline(m, col = "red", lty = 2)代表红色虚线拟合线

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