n <- c(10,20,30,40)
a <- 2
b <- 3
names(n) <- paste("group", 1:4, sep="")
contrMat(n) # Dunnett is default
contrMat(n, type="Tukey")
contrMat(n, type="Sequen")
contrMat(n, type="AVE")
contrMat(n, type="Changepoint")
contrMat(n, type="Williams")
contrMat(n, type="Marcus")
contrMat(n, type="McDermott")
contrMat(n, type="Tetrade", nlevel=c(a,b))
Run the code above in your browser using DataLab