> library(multcomp)
>contrast<-rbind("no drug vs.drug"=c(3,-1,-1,-1))
>summary(glht(fit,linfct=mcp(dose=contrast)))

不懂的是为什么c(3,-1,-1,-1)表示第一组和后三组的比较，如果想表示第二组和最后一组的比较应该是什么呢？