如何在 R 中从线性回归中提取 p 值和 R 平方?


我们可以使用带有 $r.squared 的回归模型对象名称来查找 R 平方,并使用用户自定义函数来提取 p 值。

示例

提取 R 平方

> x<-c(32,37,68,87,32,43)
> y<-c(12,8,6,3,5,3)
> LinearRegression<-lm(y~x)
> summary(LinearRegression)$r.squared
[1] 0.2814271

提取 p 值

> Regressionp <- function (modelobject) {
   if (class(modelobject) != "lm") stop("Not an object of class 'lm' ")
   f <- summary(modelobject)$fstatistic
   p <- pf(f[1],f[2],f[3],lower.tail=F)
   attributes(p) <- NULL
   return(p)
> Regressionp(LinearRegression)
[1] 0.2789025

更新时间:2020-07-06

1K+ 浏览量

开启你的 职业

通过完成课程获得认证

开始
广告