我正在尝试进行问题分析，但使用维度，例如：
维度 1
- 问题 1(p1)：
- 问题 2(p2)：
- 问题 3(p3)：
维度 2
- 问题 4(p4)：
- 问题 5(p5)：
- 问题 6(p6)：
- 问题 7(p7)：
require(tibble)
tb = tibble("p1" = factor(c(5, 1, 4, 3, 2, 4, 4, 4, 2, 5),
labels = c("totally disagree","disagreement","neutral","agree","totally agree")),
"p2" = factor(c(1, 3, 2, 1, 1, 5, 3, 5, 5, 4),
labels = c("totally disagree","disagreement","neutral","agree","totally agree")),
"p3" = factor(c(3, 5, 3, 4, 3, 2, 1, 1, 1, 2),
labels = c("totally disagree","disagreement","neutral","agree","totally agree")),
"p4" = factor(c(1, 3, 5, 4, 1, 4, 2, 4, 5, 2),
labels = c("totally disagree","disagreement","neutral","agree","totally agree")),
"p5" = factor(c(5, 4, 2, 4, 2, 3, 2, 1, 3, 5),
labels = c("totally disagree","disagreement","neutral","agree","totally agree")),
"p6" = factor(c(2, 5, 1, 3, 4, 1, 3, 2, 2, 1),
labels = c("totally disagree","disagreement","neutral","agree","totally agree")),
"p7" = factor(c(2, 4, 5, 2, 5, 5, 3, 3, 1, 2),
labels = c("totally disagree","disagreement","neutral","agree","totally agree")))
现在我想做一个总结，但是按维度来说，likert 库中是否有此功能？
例如
> likert(summary = tb$results)
Dimensions totally disagree disagree neutral agree totally agree
1 Dimension 1 17.69912 30.08850 44.24779 6.194690 1.769912
2 Dimension 2 23.89381 36.28319 30.08850 7.964602 1.769912