Poisson.ratio(x, y, conf.level=0.95, alternative="two.sided")
Quasipoisson.ratio(x, y, conf.level=0.95, alternative="two.sided")
Negbin.ratio(x, y, conf.level=0.95, alternative="two.sided")library(mratios)
data(Mutagenicity)
QPCI<-pairwiseCI(MN ~ Treatment, data=Mutagenicity,
alternative="greater", control="Vehicle", method="Quasipoisson.ratio")
plot(QPCI)Run the code above in your browser using DataLab