powered by
cochran.qtest(resp, fact, block, alpha = 0.05, p.method = "fdr")
p.adjust()
response<-c(0,1,1,0,0,1,0,1,1,1,1,1,0,0,1,1,0,1,0,1,1,0,0,1,0,1,1,0,0,1) factor<-factor(rep(LETTERS[1:3],10)) block<-factor(rep(letters[1:10],each=3)) cochran.qtest(response,factor,block)
Run the code above in your browser using DataLab