library(agricolae)
Aug<- DAU.test(AugC$block, AugC$trt, AugC$lt, method = c("lsd"), alpha = 0.05, group = TRUE, console=FALSE)
Error in contrasts<-(*tmp*, value = contr.funs[1 + isOF[nn]]) :
contrasts can be applied only to factors with 2 or more levels