颜色在“ 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)

在此示例中，类别按顺序（Link）

但是当我添加自定义颜色时，此顺序将更改：

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

此外，颜色没有按照指定的顺序显示。 （Link）

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

亲切的问候

Answer 1

我认为我已经解决了这个问题，方法是在第一行中使用“颜色”选项。

赞：

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

我将必须测试它是否可以在整个脚本中正常工作。