# NOT RUN {
data(panic)
a<-mctp.rm(CGI~week, data=panic, type = "Dunnett",
alternative = "two.sided",
asy.method = "log.odds", plot.simci = FALSE,
info = FALSE, contrast.matrix = NULL)
summary(a)
plot(a)
b<-mctp.rm(CGI~week, data=panic, type = "Dunnett",
alternative = "two.sided",
asy.method = "mult.t", plot.simci = FALSE,
info = FALSE, contrast.matrix = NULL)
summary(b)
plot(b)
c<-mctp.rm(CGI~week, data=panic, type = "Dunnett",
alternative = "two.sided",
asy.method = "fisher", plot.simci = FALSE,
info = FALSE, contrast.matrix = NULL)
summary(c)
plot(c)
d<-mctp.rm(CGI~week, data=panic, type = "Tukey",
alternative = "two.sided",
asy.method = "mult.t", plot.simci = TRUE)
summary(d)
# }
Run the code above in your browser using DataLab