Differences

This shows you the differences between two versions of the page.

--- r:semipartial [2018/11/23 15:34] – [m1] hkimscil
+++ r:semipartial [2018/11/26 09:55] – [m2] hkimscil
@@ Line 177: / Line 177: @@
 Resid   0.000   0.482 0.000 1.000
 </code>
+  * 상관관계 (CLEP * MathGPA) = .876 으로 SAT-Q와 MathGPA보다 높다.
+  * 종속변인인 MathGPA와 Resid와의 상관관계는 .482
+  * Pred value와 CLEP(독립변인)과는 상관관계 1.
+  * Resid는 독립변인과도 또한 Pred와도 상관관계 없음 (0).
 <code>
 data3
@@ Line 193: / Line 199: @@
   550   31
 </code>
+<code>
+mall <- lm(data2$MathGPA ~ data2$CLEP + data2$SATQ)
+</code>
+<code>> mall <- lm(data$MathGPA ~ data$CLEP + data$SATQ)
+>
+> mall
+Call:
+lm(formula = data$MathGPA ~ data$CLEP + data$SATQ)
+Coefficients:
+(Intercept)    data$CLEP    data$SATQ
+.160756     0.072929    -0.000702
+> summary(mall)
+Call:
+lm(formula = data$MathGPA ~ data$CLEP + data$SATQ)
+Residuals:
+     Min       1Q   Median       3Q      Max
+-0.19789 -0.12897 -0.00053  0.13117  0.22640
+Coefficients:
+             Estimate Std. Error t value Pr(>|t|)
+(Intercept)  1.160756   0.408112    2.84    0.025 *
+data$CLEP    0.072929   0.025380    2.87    0.024 *
+data$SATQ   -0.000702   0.001256   -0.56    0.594
+---
+Signif. codes:  0 ‘***’ 0.001 ‘**’ 0.01 ‘*’ 0.05 ‘.’ 0.1 ‘ ’ 1
+Residual standard error: 0.171 on 7 degrees of freedom
+Multiple R-squared:  0.778,	Adjusted R-squared:  0.714
+F-statistic: 12.2 on 2 and 7 DF,  p-value: 0.00518
+> </code>
+====== m3 ======
 <code>
 m3 <- lm(CLEP ~ SATQ, data=data3)