# run simulation of responses for 4 categories and then test for category
# effect on response using the CBT from Steinmetz & Thorp, 2013
simCatResp(1,c(1,1.5,2,1),6)->sim4
testCatEffectBoot(sim4,100,sumSqCat,backMean=1)
Run the code above in your browser using DataLab