如何在散点图矩阵中插入趋势线答案

【问题标题】：how to insert trendlines in scatterplot matrix [closed]如何在散点图矩阵中插入趋势线
【发布时间】：2016-09-23 19:01:14
【问题描述】：

我已经制作了一个散点图矩阵，并希望将趋势线添加到每个图或仅添加到显着者的图上。我的 R 命令： cor(K4Full[,c(6:9,22:25)]) 情节(K4Full[,c(6:8,22:25)])

【问题讨论】：

标签： r matrix correlation scatter-plot

【解决方案1】：

您可以尝试以下方法：

pairs(K4Full[,c(6:8,22:25)], panel=panel.smooth)

mtcars 数据集示例：

pairs(mtcars[1:6],panel=panel.smooth)

用 lm 拟合直线：

panel.lm <- function (x, y,  pch = par("pch"), col.lm = "red",  ...) {   
  ymin <- min(y)
  ymax <- max(y)
  xmin <- min(x)
  xmax <- max(x)
  ylim <- c(min(ymin,xmin),max(ymax,xmax))
  xlim <- ylim
  points(x, y, pch = pch,ylim = ylim, xlim= xlim,...)
  ok <- is.finite(x) & is.finite(y)
  if (any(ok)) 
    abline(lm(y[ok]~ x[ok]), 
           col = col.lm, ...)
}

pairs(mtcars[1:6],panel=panel.lm)

【讨论】：

是否可以将趋势线创建为直线？
已更新，带有来自personality-project.org/r/Rfunc/pairs.panels.R的panel.lm函数