r - 从 lmer 模型中绘制随机截距

Question

我运行了一个如下所示的回归：

fit <- lmer(support ~ 1 + (1 | country), data = df, REML = F)

我想绘制不同国家的不同截距。我尝试使用以下代码：

p1 <- ggplot(fit, aes(support, colour=country)) + geom_line()

不幸的是，它不起作用。有谁知道该怎么做？

标签： rggplot2regressionlme4