如何将 Adjusted R-Square 值作为变量?

How to get Adjusted R-Square value as variable?

我正在尝试在 R(编程语言)中获取 Adjusted R-Square 值并将其存储为变量。我不确定如何完成此操作。

如果调用:

,我可以看到 R 方值
summary(lm(x~y))

连同其余数据,但我如何获得具体值?

summary( lm(y~x) )$adj.r.squared

Whosebug 是问这类问题的更好的地方,但简而言之,

x <- 1:5
y <- jitter(x * 2) + rnorm(5)
fit <- lm(y~x)
names(fit)
str(fit) # more detail

对于系数,

fit$coef

将打印它们。命令 strnames 可以帮助您解决很多问题。

CrockGill 的回答是正确的,但我也认为了解如何 找到获取这些变量的代码很重要。

您可以像这样使用属性函数:

attributes(summary(lm(x~y)))

这个returns:

$names
 [1] "call"          "terms"         "residuals"     "coefficients"  "aliased"       "sigma"        
 [7] "df"            "r.squared"     "adj.r.squared" "fstatistic"    "cov.unscaled" 

$class
[1] "summary.lm"

从这里可以看出$adj.r.squared就是summary(lm(x~y)).

后面需要输入的内容