Изменение стандартных текстов 'likert'

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