Изменение метки для термина взаимодействия при построении регрессии с помощью SjPlot

Question

Я пытаюсь использовать sjPlot для построения коэффициентов регрессии, включающей несколько членов взаимодействия. Я изменил метки всех переменных, чтобы они были более понятными, но, к сожалению, взаимодействия отображаются как просто variable_1: variable_2.

Есть ли способ изменить вывод для этих взаимодействий, чтобы он отображался как "label_1 x label_2" или что-то в этом роде?

Вот пример:

data(mtcars)

library(ggplot2)
library(sjPlot)
library(sjlabelled)
library(dplyr)

mtcars <- mtcars %>% var_labels(
  mpg = "Miles per Gallon",
  cyl = "Cylinder"
)

x <- lm(hp ~ mpg*cyl, data=mtcars)

plot_model(x)

Answer 1

Вы можете добавить метки в функции scale_x_discrete. Это избавляет от необходимости добавлять var_labels к переменным.

data(mtcars)
x <- lm(hp ~ mpg*cyl, data=mtcars) 

plot_model(x) +
  scale_x_discrete(labels=list(
    mpg = "Miles per Gallon", 
    cyl = "Cylinders",
    `mpg:cyl` = "Miles per Gallon : Cylinders"))

---