data(bean)
out<-pairwiseCI(yield~P, data=bean, by="T", method="Param.diff",
var.equal=FALSE, alternative="greater")
out
dat<-as.data.frame(out)
dat
str(dat)
# # # #
data(repellent)
out2<-pairwiseCI(decrease~treatment, data=repellent, control="H",
alternative="two.sided", method="Param.ratio")
out2
as.data.frame(out2)Run the code above in your browser using DataLab