Differences in Neuropsych Test Scores from Wave 1 to Wave 3

load(file="~/Desktop/Dissertation Research /widenp13.Rda")

Brief Test of Attention

Attention = t.test(widenp13$Attention.1,widenp13$Attention.3,paired=TRUE)
Attention

## 
##  Paired t-test
## 
## data:  widenp13$Attention.1 and widenp13$Attention.3
## t = 5.4296536, df = 1520, p-value = 6.564092e-08
## alternative hypothesis: true difference in means is not equal to 0
## 95 percent confidence interval:
##  0.1809968476 0.3857355653
## sample estimates:
## mean of the differences 
##            0.2833662064

California Verbal Learning Test A

CVLtca = t.test(widenp13$CVLtca.1,widenp13$CVLtca.3,paired=TRUE)
CVLtca

## 
##  Paired t-test
## 
## data:  widenp13$CVLtca.1 and widenp13$CVLtca.3
## t = 38.470457, df = 1613, p-value < 2.2204e-16
## alternative hypothesis: true difference in means is not equal to 0
## 95 percent confidence interval:
##  6.447301055 7.140059540
## sample estimates:
## mean of the differences 
##             6.793680297

California Verbal Learning Test B

CVLtcb = t.test(widenp13$CVLtcb.1,widenp13$CVLtcb.3,paired=TRUE)
CVLtcb

## 
##  Paired t-test
## 
## data:  widenp13$CVLtcb.1 and widenp13$CVLtcb.3
## t = 31.924465, df = 1599, p-value < 2.2204e-16
## alternative hypothesis: true difference in means is not equal to 0
## 95 percent confidence interval:
##  1.613736087 1.825013913
## sample estimates:
## mean of the differences 
##                1.719375

California Verbal Learning Test Learning Slope

CVLbet = t.test(widenp13$CVLbet.1,widenp13$CVLbet.3,paired=TRUE)
CVLbet

## 
##  Paired t-test
## 
## data:  widenp13$CVLbet.1 and widenp13$CVLbet.3
## t = 2.7448119, df = 1618, p-value = 0.006121499
## alternative hypothesis: true difference in means is not equal to 0
## 95 percent confidence interval:
##  0.02899875272 0.17421310646
## sample estimates:
## mean of the differences 
##            0.1016059296

Digit Span Forward

DigitSpanFwd = t.test(widenp13$DigitSpanFwd.1,widenp13$DigitSpanFwd.3,paired=TRUE)
DigitSpanFwd

## 
##  Paired t-test
## 
## data:  widenp13$DigitSpanFwd.1 and widenp13$DigitSpanFwd.3
## t = 1.5353205, df = 1748, p-value = 0.1248861
## alternative hypothesis: true difference in means is not equal to 0
## 95 percent confidence interval:
##  -0.01760942808  0.14453910218
## sample estimates:
## mean of the differences 
##           0.06346483705

Digit Span Backward

DigitSpanBck = t.test(widenp13$DigitSpanBck.1,widenp13$DigitSpanBck.3,paired=TRUE)
DigitSpanBck

## 
##  Paired t-test
## 
## data:  widenp13$DigitSpanBck.1 and widenp13$DigitSpanBck.3
## t = 1.3336342, df = 1724, p-value = 0.1824999
## alternative hypothesis: true difference in means is not equal to 0
## 95 percent confidence interval:
##  -0.02619402374  0.13749837157
## sample estimates:
## mean of the differences 
##           0.05565217391

Mini Mental Status Exam

MMStot = t.test(widenp13$MMStot.1,widenp13$MMStot.3,paired=TRUE)
MMStot

## 
##  Paired t-test
## 
## data:  widenp13$MMStot.1 and widenp13$MMStot.3
## t = 4.7414613, df = 1798, p-value = 2.288921e-06
## alternative hypothesis: true difference in means is not equal to 0
## 95 percent confidence interval:
##  0.1140767462 0.2750283122
## sample estimates:
## mean of the differences 
##            0.1945525292

Trail Making Test Part A

TrailsA = t.test(widenp13$TrailsAtestSec.1,widenp13$TrailsAtestSec.3,paired=TRUE)
TrailsA

## 
##  Paired t-test
## 
## data:  widenp13$TrailsAtestSec.1 and widenp13$TrailsAtestSec.3
## t = -2.1177042, df = 1957, p-value = 0.03432592
## alternative hypothesis: true difference in means is not equal to 0
## 95 percent confidence interval:
##  -5.7094000021 -0.2190984657
## sample estimates:
## mean of the differences 
##            -2.964249234

Trail Making Test Part B

TrailsB = t.test(widenp13$TrailsBtestSec.1,widenp13$TrailsBtestSec.3,paired=TRUE)
TrailsB

## 
##  Paired t-test
## 
## data:  widenp13$TrailsBtestSec.1 and widenp13$TrailsBtestSec.3
## t = -5.8736656, df = 1947, p-value = 5.000876e-09
## alternative hypothesis: true difference in means is not equal to 0
## 95 percent confidence interval:
##  -25.41862850 -12.69328115
## sample estimates:
## mean of the differences 
##            -19.05595483

Word Fluency

FluencyWord = t.test(widenp13$FluencyWord.1,widenp13$FluencyWord.3,paired=TRUE)
FluencyWord

## 
##  Paired t-test
## 
## data:  widenp13$FluencyWord.1 and widenp13$FluencyWord.3
## t = -1.2563914, df = 1980, p-value = 0.2091223
## alternative hypothesis: true difference in means is not equal to 0
## 95 percent confidence interval:
##  -0.30509032753  0.06682682425
## sample estimates:
## mean of the differences 
##           -0.1191317516