Определение диапазона оси y и разрывов в пакете sjPlot :: plot_model ()

Question

Я строю результаты моей модели GlmmTMB с пакетом sjplot и функцией plot_model (max.m3) в R. Вот код:

p=sjPlot::plot_model(max.m3, type="pred", grid = F)

Это шесть графиков, которые построены, чем,Тем не менее, я хотел бы определить диапазон оси Y (в диапазоне от 0 до 10) и показанные разрывы (0,5,10 = так, чтобы отметки появлялись в 0, 5 и 10).

К сожалению, яне нашел решения для этого.

Answer 1

Если вы наносите маржинальные эффекты для всех терминов модели, plot_model() возвращает список объектов ggplot. Затем вы можете изменить каждый график в списке, просто используя команды ggplot.

m <- lm(mpg ~ hp + gear + cyl + drat, data = mtcars)
p <- sjPlot::plot_model(m, type = "pred", grid = FALSE)
p[[1]] + scale_y_continuous(limits = c(15, 30), breaks = c(15, 25, 30))
p[[2]] + scale_y_continuous(limits = c(5, 40), breaks = c(15, 25, 40))
...

Если вы хотите применить одинаковые y-ограничения и разрывы ко всем графикам, вы можете перебрать список, например ::

library(ggplot2)
m <- lm(mpg ~ hp + gear + cyl + drat, data = mtcars)
p <- sjPlot::plot_model(m, type = "pred", grid = FALSE)
lapply(p, function(i) i + scale_y_continuous(limits = c(15, 30), breaks = c(15, 25, 30)))