# NOT RUN {
data(PoohPiglet)
PoohPiglet$Likert.f = factor(PoohPiglet$Likert, ordered = TRUE)
PoohPiglet$Speaker = factor(PoohPiglet$Speaker,
levels = c("Pooh", "Tigger", "Piglet"))
PT = pairwiseOrdinalMatrix(Likert.f ~ Speaker,
data = PoohPiglet,
method = "fdr")$Adjusted
PT
library(multcompView)
multcompLetters(PT,
compare="<",
threshold=0.05,
Letters=letters)
# }
Run the code above in your browser using DataLab