我绘制了一个交互图,但不知道如何格式化该图。 右侧的图例应包含文本“动机问题”(蓝色正方形)和知识问题(红色正方形),以便可以清楚地识别线条。
很遗憾,我不能提供超过以下几行的数据。
modelfit.cmppi.hlm <- lmer(zZufri ~ TreffID + zPssg_sd + zprobtyp + zPssg_sd*zprobtyp + (TreffID | GroupID/PersonID), data=df.hlm, REML = TRUE)
summary(modelfit.cmppi.hlm)
ranova(modelfit.cmppi.hlm) # Remove Random slopes
ranova(modelfit.cmppi.hlm, reduce.terms = FALSE) # Remove Random-Intercepts
# Interaktion plot
library(sjPlot)
plot_model(modelfit.cmppi.hlm,
type = "int",
axis.title = c("others <-- Fit --> direct", "Satisfaction"),
legend.title = "red = Knowledge\nblue = Motivational problems")