实际上,可以将多个R视为响应和拟合值之间的相关性。因此,这始终是积极的。多个R平方是其平方版本。
让我用一个小例子来说明:
set.seed(32)
n <- 100
x1 <- runif(n)
x2 <- runif(n)
y <- 4 + x1 - 2*x2 + rnorm(n)
fit <- lm(y ~ x1 + x2)
summary(fit) # Multiple R-squared: 0.2347
(R <- cor(y, fitted(fit))) # 0.4845068
R^2 # 0.2347469
XX