更改“李克特”标准文本

Question

我不知道如何更改使用Likert软件包创建的绘图上的标准文本。

为了简单起见，我只提供示例数据，因为解决方案可能是相同的。

library(likert)

data(pisaitems) 

items28 <- pisaitems[, substr(names(pisaitems), 1, 5) == "ST24Q"] 

l28 <- likert(items28) 

plot(l28)

输出应如下图所示，我要更改的是单词“ Response”和“ Percentage”。

希望您能提供帮助！

Answer 1

欢迎您！我不知道likert包，但似乎它的功能plot是基于ggplot2的，所以您可以用ggplot2的方式修改选项：

plot(l28) +
  labs(
    x = "Another lab",                          # here you manage axis
    y = "My lab"                                # also here ("inverted "because
                                                # it seems plot has coord_flip option)
  ) + guides(fill=guide_legend("My e title"))   # here you manage the title of the legend