问题描述
这是我的代码,我尝试了多种方法来添加图形标题,但都没有成功。
plot_model(mm1,type="pred",title = "随机截距和固定斜率",term=c("l.carb","mfr"),pred.type="re")
提前致谢!
解决方法
由于 sjPlot::plot_model()
创建的对象是 ggproto
对象,因此您可以与输出进行交互,就像使用 ggplot()
绘制绘图一样。使用 labs()
并引用 caption=
。请注意,您还可以使用它来覆盖由 plot_model()
创建的任何现有标签(如标题、轴标签等...)。
这里,我修改了 first example shown on the sjPlot reference。
library(sjmisc)
data(efc)
efc <- to_factor(efc,c161sex,e42dep,c172code)
m <- lm(neg_c_7 ~ pos_v_4 + c12hour + e42dep + c172code,data = efc)
# simple forest plot
p <- plot_model(m)
p + labs(caption='This is my caption')