```
#Read in the ANT data (see ?ANT).
data(ANT)
head(ANT)
ezPrecis(ANT)
#Run an ANOVA on the mean correct RT data.
rt_anova = ezANOVA(
data = ANT[ANT$error==0,]
, dv = .(rt)
, wid = .(subnum)
, within = .(cue,flank)
, between = .(group)
)
#Show the ANOVA & assumption tests.
print(rt_anova)
#Run an ANOVA on the mean_rt data, ignoring group.
rt_anova2 = ezANOVA(
data = ANT[ANT$error==0,]
, dv = .(rt)
, wid = .(subnum)
, within = .(cue,flank)
)
#Show the ANOVA & assumption tests.
print(rt_anova2)
#Run a purely between-Ss ANOVA on the mean_rt data.
rt_anova3 = ezANOVA(
data = ANT[ANT$error==0,]
, dv = .(rt)
, wid = .(subnum)
, between = .(group)
)
#Show the ANOVA & assumption tests.
print(rt_anova3)
```

Run the code above in your browser using DataLab