library(zStat)

load("/prj/hnd/Wave04/znlz/Joggle/2013-12-10.rdata")
load("/prj/hnd/zrdata/w01Neupsy.rdata")

JoggleNeupsyw01 = merge(Joggle, w01Neupsy, "HNDid", all = T)

jogVars = zQ(BARTaccuracy, DSSTefficiency, LOTefficiency, PVTefficiency, AMefficiency, NBACKaccuracy, VOLTefficiency, MPTspeed)
neuVars = zQ(BVRtot, CrdRot, IdentPicCor, IdentPicErr, CVLca1, CVLca2, CVLca3, CVLtcb, CVLfrs, CVLfrl, DigitSpanFwd, DigitSpanBck, FluencyWord, TrailsAtestSec, TrailsBtestSec, Attention)

zCor(JoggleNeupsyw01[, jogVars], JoggleNeupsyw01[, neuVars])
               BVRtot   CrdRot   IdentPicCor IdentPicErr CVLca1   CVLca2   CVLca3   CVLtcb   CVLfrs   CVLfrl   DigitSpanFwd DigitSpanBck FluencyWord TrailsAtestSec TrailsBtestSec Attention
BARTaccuracy   -0.13     0.19     0.28**     -0.09        0.27**   0.19     0.11     0.07     0.21*    0.18    -0.10        -0.04         0.26*      -0.06          -0.00           0.08    
DSSTefficiency -0.50***  0.40     0.59***    -0.32**      0.44***  0.40***  0.38***  0.23*    0.37***  0.41***  0.19         0.18         0.26*      -0.35***       -0.36***        0.37*** 
LOTefficiency  -0.54***  0.50***  0.52       -0.24*       0.34***  0.37***  0.34***  0.17     0.35***  0.34***  0.37***      0.32**       0.28**     -0.39***       -0.35***        0.43*** 
PVTefficiency  -0.50***  0.40***  0.38***    -0.23        0.42***  0.38***  0.42***  0.30**   0.39***  0.40***  0.38***      0.31**       0.23*      -0.35***       -0.35***        0.38*** 
AMefficiency   -0.04     0.18     0.20        0.13       -0.01     0.02    -0.12     0.06    -0.01    -0.02     0.10         0.02        -0.04        0.00          -0.03           0.08    
NBACKaccuracy  -0.23*    0.34**   0.29**     -0.19        0.31**   0.35     0.27*    0.20     0.34***  0.33**   0.21*        0.22*        0.26*      -0.21*         -0.15           0.32**  
VOLTefficiency -0.38***  0.30**   0.34**     -0.27*       0.33**   0.26*    0.20     0.11     0.22*    0.23*    0.20         0.15         0.12       -0.28**        -0.34***        0.18    
MPTspeed       -0.27**   0.19     0.31**     -0.13        0.32**   0.19     0.16     0.03     0.23*    0.20     0.25*        0.08         0.16       -0.36***       -0.20           0.20    

n
               BVRtot CrdRot IdentPicCor IdentPicErr CVLca1 CVLca2 CVLca3 CVLtcb CVLfrs CVLfrl DigitSpanFwd DigitSpanBck FluencyWord TrailsAtestSec TrailsBtestSec Attention
BARTaccuracy       92     81          88          88     92     92     92     90     91     90           95           95          93             94             94        87
DSSTefficiency     92     81          88          88     92     92     92     90     91     90           95           95          93             94             94        87
LOTefficiency      92     81          88          88     92     92     92     90     91     90           95           95          93             94             94        87
PVTefficiency      92     81          88          88     92     92     92     90     91     90           95           95          93             94             94        87
AMefficiency       92     81          88          88     92     92     92     90     91     90           95           95          93             94             94        87
NBACKaccuracy      92     81          88          88     92     92     92     90     91     90           95           95          93             94             94        87
VOLTefficiency     92     81          88          88     92     92     92     90     91     90           95           95          93             94             94        87
MPTspeed           92     81          88          88     92     92     92     90     91     90           95           95          93             94             94        87