################################################### ### chunk number 1: pg 145 ################################################### elgar <- read.table('elgar.csv', header=T, sep=',') ################################################### ### chunk number 2: pg 146 ################################################### with(elgar, boxplot(HORIZLIG -HORIZDIM)) ################################################### ### chunk number 3: pg 146 ################################################### with(elgar, boxplot(VERTLIGH -VERTDIM)) ################################################### ### chunk number 4: pg 146 ################################################### with(elgar, t.test(HORIZLIG,HORIZDIM, paired=T)) ################################################### ### chunk number 5: pg 146 ################################################### with(elgar, t.test(VERTLIGH,VERTDIM, paired=T))