powered by
likert.matrix.plot(likert, nSample = nrow(likert$items), ...)
likert
pisaitems
pairs.ordered.categorical