Repository of Reproducible Computations

Pearson Correlation Matrix

> r0
              Geslacht       Drugs      Fruit       Sport  Gebgewicht
Geslacht    1.00000000  0.00000000  0.0000000  0.11547005  0.21038067
Drugs       0.00000000  1.00000000 -0.4364358  0.12598816 -0.03443162
Fruit       0.00000000 -0.43643578  1.0000000 -0.11547005  0.23667826
Sport       0.11547005  0.12598816 -0.1154701  1.00000000 -0.09109750
Gebgewicht  0.21038067 -0.03443162  0.2366783 -0.09109750  1.00000000
Inter       0.98640481 -0.01230007  0.0225464  0.04230579  0.33351510
Gebgew2     0.22288281 -0.03301269  0.2240376 -0.08912135  0.99690343
Numeracy   -0.03066497 -0.33681284  0.2350981 -0.10032511  0.27310579
                 Inter     Gebgew2    Numeracy
Geslacht    0.98640481  0.22288281 -0.03066497
Drugs      -0.01230007 -0.03301269 -0.33681284
Fruit       0.02254640  0.22403765  0.23509813
Sport       0.04230579 -0.08912135 -0.10032511
Gebgewicht  0.33351510  0.99690343  0.27310579
Inter       1.00000000  0.34954026 -0.01065885
Gebgew2     0.34954026  1.00000000  0.22087045
Numeracy   -0.01065885  0.22087045  1.00000000

Partial Pearson Correlation Matrix (Shrinkage Method)

> r1
               Geslacht        Drugs        Fruit         Sport  Gebgewicht
Geslacht    1.000000000 -0.003618815 -0.006927852  0.0550790124  0.01822614
Drugs      -0.003618815  1.000000000 -0.201744047  0.0473363349  0.02078778
Fruit      -0.006927852 -0.201744047  1.000000000 -0.0357548335  0.06572371
Sport       0.055079012  0.047336335 -0.035754833  1.0000000000 -0.02447366
Gebgewicht  0.018226136  0.020787776  0.065723706 -0.0244736622  1.00000000
Inter       0.477678018 -0.008995223 -0.007836196  0.0004265436  0.07682023
Gebgew2     0.021989973  0.013208027  0.058219859 -0.0252907248  0.46561584
Numeracy   -0.016839607 -0.147851550  0.064513727 -0.0287769649  0.09143494
                   Inter     Gebgew2    Numeracy
Geslacht    0.4776780179  0.02198997 -0.01683961
Drugs      -0.0089952229  0.01320803 -0.14785155
Fruit      -0.0078361962  0.05821986  0.06451373
Sport       0.0004265436 -0.02529072 -0.02877696
Gebgewicht  0.0768202307  0.46561584  0.09143494
Inter       1.0000000000  0.08594843 -0.02091544
Gebgew2     0.0859484291  1.00000000  0.04754482
Numeracy   -0.0209154438  0.04754482  1.00000000
attr(,"lambda")
[1] 0.5026029
attr(,"lambda.estimated")
[1] TRUE
attr(,"class")
[1] "shrinkage"
attr(,"spv")
  Geslacht      Drugs      Fruit      Sport Gebgewicht      Inter    Gebgew2 
 0.7557947  0.9293857  0.9308171  0.9871565  0.7365811  0.7402586  0.7400433 
  Numeracy 
 0.9456157