!RENAME !ARG 1 2
# Paired Case-Control study of effect of Bloodworms on Rice Seedling Root growth
# Each run tested 2 varieties by the two treatments (4 trays of 32 seedlings)
# There were three repilcates and 44 varieties: 66 runs

Bloodworm data Dr M Stevens
 pair 132
 run 66
 variety 44 !A
 tmt 2 !A
 rootwt
worm.txt !skip 1 !DOPART $1 

!PART 1
sqrt(rootwt) ~ mu tmt !r idv(variety) idv(variety.tmt) idv(run) idv(pair) idv(run.tmt)
tabulate sqrt(rootwt) !COUNT ~ var run

!PART 2
sqrt(rootwt) ~ mu tmt !r idv(variety) diag(tmt !GU).ikd(variety) idv(run) diag(tmt !GU).id(run),
 idv(pair) uni(tmt,2)
