r - 颜色在“likert”中重新排列 x 轴 - 我该如何避免这种情况？

Question

当我使用“likert”包进行绘图时，添加自定义颜色会重新排列选项（x 轴）。我该如何避免这种情况？

我可以用示例数据来说明它：

library(likert)
library(tidyverse)
data(pisaitems)
items29 <- pisaitems[,substr(names(pisaitems), 1,5) == 'ST25Q']
names(items29) <- c("Magazines", "Comic books", "Fiction", 
                    "Non-fiction books", "Newspapers")
l29 <- likert(items29)
plot(l29)

在此示例中，类别按顺序排列（链接）

但是当我添加我的自定义颜色时，这个顺序会改变：

plot(l29) +
scale_fill_manual(values=c("#00aba4","#73d1cd","#e7e7e7","#bcbddc","#756bb1")) 

此外，颜色也不是按照指定的顺序呈现的。（链接）

如何控制类别和颜色的顺序？

亲切的问候

Answer 1

我想我通过在第一行中使用选项“颜色”解决了这个问题。

像这样：

plot(129, colors = c("#00aba4","#73d1cd","#e7e7e7","#bcbddc","#756bb1"))

我将不得不测试这是否适用于我的脚本。