# \donttest{
data(shoulder)
fit <- nparLD(
resp ~ group1 * group2 * time,
data = shoulder,
subject = "subject",
hypothesis = "H0p",
contrast = list("time", "Dunnett")
)
plot(fit$MCTP)
# }
Run the code above in your browser using DataLab