#100 simulations
#position only, e.g. 8 tanks
if (FALSE) powerLmer2(varcomp=c(0.2030,0,0.1798,0.5499,0.1077),nval=c(8,8,20,160),position=8)
#block only, e.g. four 2 x 2
if (FALSE) powerLmer2(varcomp=c(0.2030,0,0.1798,0.5499,0.1077),nval=c(8,8,20,4),block=c(2,2))
#position and block
if (FALSE) powerLmer2(varcomp=c(0.2030,0,0.1798,0.5499,0.1077,0.1077),nval=c(8,8,20,40,4),
position=8,block=c(2,2))
Run the code above in your browser using DataLab