Differences

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

--- sequential_regression [2019/10/18 07:24] – [r] hkimscil
+++ sequential_regression [2019/10/18 07:33] – [r] hkimscil
@@ Line 197: / Line 197: @@
 $method
 [1] "pearson"
+## zero-order correlation
+> cor(datavar)
+            bankaccount     income     famnum
+bankaccount   1.0000000  0.7944312 -0.6922935
+income        0.7944312  1.0000000 -0.3999614
+famnum       -0.6922935 -0.3999614  1.0000000
+>
 </code>
@@ Line 214: / Line 222: @@
+|  | bankaccount  | income  | famnum   |
+| bankaccount  | 1.0000000  | 0.7944312  | -0.6922935  |
+| income  | 0.7944312  | 1.0000000  | -0.3999614   |
+| famnum  | -0.6922935  | -0.3999614   | 1.0000000    |
+<code>
+pcor.test(datavar$bankaccount, datavar$income, datavar$famnum)
+pcor.test(datavar$bankaccount, datavar$famnum, datavar$income)
+spcor.test(datavar$bankaccount, datavar$income, datavar$famnum)
+spcor.test(datavar$bankaccount, datavar$famnum, datavar$income)
+</code>
+. . .
+<code>
+> pcor.test(datavar$bankaccount, datavar$income, datavar$famnum)
+   estimate    p.value statistic  n gp  Method
+0.7825112 0.01267595  3.325102 10  1 pearson
+> pcor.test(datavar$bankaccount, datavar$famnum, datavar$income)
+   estimate    p.value statistic  n gp  Method
+-0.672856 0.04702022 -2.406425 10  1 pearson
+>
+> spcor.test(datavar$bankaccount, datavar$income, datavar$famnum)
+   estimate  p.value statistic  n gp  Method
+0.5646726 0.113182  1.810198 10  1 pearson
+> spcor.test(datavar$bankaccount, datavar$famnum, datavar$income)
+    estimate   p.value statistic  n gp  Method
+-0.4086619 0.2748117 -1.184655 10  1 pearson
+>
+>
+</code>