BDM.test(Y, X)
BDM.2way(Y, X1, X2)
BDM.test
BDM.2way
.BDM.2way
.kruskal.test
, trim.test
rye<-c(50,49.8,52.3,44.5,62.3,74.8,72.5,80.2,47.6,39.5,47.7,50.7)
nutrient<-factor(c(rep(1,4),rep(2,4),rep(3,4)))
BDM.test(Y=rye,X=nutrient)
Run the code above in your browser using DataLab