使用此页面作为参考http://jason.bryer.org/likert/我发现当我使用自己的数据复制Bryers代码时，Likert因子级别的顺序错误。这似乎不会发生在演示代码中，但与我的一样。
我用
绘图plot(lexam, centered = FALSE, wrap = 30)
获取您看到的图像
我尝试修改以下内容但没有成功。
levels <- c("Strongly Agree", "Agree", "Neutral", "Disagree","Strongly Disagree")
lexam[] <- lapply(lexam, function(x) factor(x, levels = levels))
有人可以建议我可以做些什么来重新排序情节的因子水平？您应该在链接的图像中看到问题所在。 Incorrect Likert Ordering
有趣的是，我在其他帖子中看到了同样的问题，但实际上并没有讨论这个问题。例如，Plot Percents with Likert Package - Doesn`t work when grouping您可以看到同样的问题，即使它不是讨论主题。
