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