向多个散点图添加回归线 [英] Adding Regression Lines to Multiple Scatter Plots

问题描述

四处看看，也找不到我的问题的答案，终于不再潜伏了。我一直在创建多个散点图，将每一列与其他列进行比较，如下所示

我使用了脚本

attach(`File`)
plot(`Files`[,c(2,3,4,5,6,7,8)])

但是，我似乎无法正确输入将回归线和R2值注释到图表上的命令。

推荐答案

以下是解决方案。假设Z是您的设计矩阵。

z=matrix(rnorm(500),ncol=5)

pairs( z, panel=function(x,y){
  points(x,y)
  abline(lm(y~x), col='red')
  text(0,1.5,labels = paste('R2=',round((cor(x,y))^2,2)) ,col='red' )
})

结果应该是这样的

这篇关于向多个散点图添加回归线的文章就介绍到这了，希望我们推荐的答案对大家有所帮助，也希望大家多多支持IT屋！