> 1m(X19~X1+X2+X3+X4+X5+X6+X7+X8+X9+X10+X11+X12+X13+X14+X15+X16+X17+X18, data=HBAT200) Call: lm(formula ~ = X19 X1 X2 X3 + X4 + X5 + X6 + X7 + X8 + X9 + X10X11+ X12+ X13 + X14 + X15 + X16 + X17 + X18, data = HBAT200) Coefficients: (Intercept) X1 -1.06547 0.31142 X8 X9 -0.01557 0.11844 X16 0.05629 X17 F F X2 X3 X4 X5 -0.01436 0.53762 X10 -0.01590 X11 0.34346 -0.24940 X12 0.45513 0.52375 X13 -0.02746 X6 0.25288 X14 0.07733 X7 -0.16999 X15 0.04659 X18 0.32472 -0.36788 > summary(1m(X19~X1+X2+X3+X4+X5+X6+X7+X8+X9+X10+X11+X12+X13+X14+X15+X16+X17+X18, data=HBAT200)) Call: = HBAT200) lm(formula = X19 ~ X1 X2 X3 + X4 + X5 + X6 + X7 + X8 + X9 + X10X11+ X12+ X13 + X14 + X15 + X16 + X17 + X18, data Residuals: Min 1Q Median 3Q Max -1.4081 -0.2997 0.0225 0.3471 1.0732 X1 0.31142 X2 -0.01436 Coefficients: Estimate Std. Error t value Pr(>Itl) (Intercept) -1.06547 0.72855 -1.462 0.145353 3.650 0.000343 *** -0.186 0.852396 0.08532 0.07708 X3 0.53762 0.09118 X4 -0.24940 0.12271 X5 0.52375 0.09693 X6 0.25288 0.04452 5.896 1.79e-08 *** -2.032 0.043569 * 5.403 2.04e-07 *** 5.680 5.30e-08 *** X7 -0.16999 0.08285 -2.052 0.041644 * X8 -0.01557 0.04115 -0.378 0.705615 X9 0.11844 0.06464 1.832 0.068543 X10 -0.01590 0.04167 -0.382 0.703163 X11 0.34346 0.16419 2.092 0.037850 * X12 0.45513 0.06875 X13 -0.02746 6.620 3.95e-10 *** 0.03171 -0.866 0.387673 X14 0.07733 0.08085 0.956 0.340104 X15 0.04659 0.02504 1.861 0.064374 X16 0.05629 0.06529 0.862 0.389710 X17 X18 0.32472 -0.36788 0.17150 1.893 0.059901 0.33646 -1.093 0.275679 Signif. codes: 0 ***** 0.001 **** 0.01 * 0.05 ' . , 0.1 ' ' 1 Residual standard error: 0.4982 on 181 degrees of freedom Multiple R-squared: 0.8535, Adjusted R-squared: 0.8389 F-statistic: 58.57 on 18 and 181 DF, p-value: < 2.2e-16 > shapiro.test(residuals(lm(X19~X1+X2+X3+X4+X5+X6+X7+X8+X9+X10+X11+X12+X13+X14+X15+X16+X17+X18, data=HBAT200))) data: Shapiro-Wilk normality test ~ residuals(lm(X19 X1 + x2 + X3 X4 X5 X6 + X7 + X8 + X9 + X10 + X11 + X12+ X13 + X14+ X15 + X16 + X17 + + + + X18, data = HBAT200)) W = 0.98308, p-value Warning messages: = 0.01658 1: In doTryCatch(return(expr), name, parentenv, handler) : display list redraw incomplete 2: In doTryCatch(return(expr), name, parentenv, handler) : invalid graphics state 3: In doTryCatch(return(expr), name, parentenv, handler) : invalid graphics state > library(car) > vif(lm(X19~X1+X2+X3+X4+X5+X6+X7+X8+X9+X10+X11+X12+X13+X14+X15+X16+X17+X18, data=HBAT200)) X1 X2 X3 X4 X5 X6 X7 X8 X9 X10 X11 3.989566 1.196917 1.674480 2.924107 X12 X13 X14 4.827168 2.015822 4.016068 1.880816 X15 X16 1.124996 2.842281 33.547784 50.975460 3.040534 3.254531 X17 X18 3.719885 4.904858 1.832070 37.518823