重回帰分析 | Hayate-Lab

データセット取り込み

データはExcel関数 Rand()*10 で作成しました。
少数第1位四捨五入。

🔗

Rcmdr>  RegModel.2 <- lm(y~x1+x2+x3, data=重回帰分析)

Rcmdr>  summary(RegModel.2)

Call:
lm(formula = y ~ x1 + x2 + x3, data = 重回帰分析)

Residuals:
       1        2        3        4        5        6 
 0.01234 -0.18643 -0.15490  0.12406  0.03084  0.17409 

Coefficients:
            Estimate Std. Error t value Pr(>|t|)   
(Intercept)  6.13845    0.40305  15.230  0.00428 **
x1          -0.40713    0.08716  -4.671  0.04290 * 
x2          -0.23235    0.05312  -4.374  0.04849 * 
x3           3.16724    0.23937  13.232  0.00566 **
---
Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1

Residual standard error: 0.2297 on 2 degrees of freedom
Multiple R-squared:  0.9962,	Adjusted R-squared:  0.9906 
F-statistic: 176.2 on 3 and 2 DF,  p-value: 0.005649