# NOT RUN {
### Two-sample paired data example with bar plot
data(Pooh)
Pooh.diff = pairwiseDifferences(Likert ~ Time,
data=Pooh,
plotit = TRUE)
### Unreplicated complete block design example with bar plots
data(BobBelcher)
Bob.diff = pairwiseDifferences(Likert ~ Instructor,
data=BobBelcher,
factorize=TRUE)
library(lattice)
histogram(~ Difference.f | Comparison,
data=Bob.diff,
type = "count",
layout=c(2,5))
# }
Run the code above in your browser using DataLab