两个模型的ranef图与grid.arrange()的结合问题

Question

我有两个大型海洋生态系统：

lme1 <- lmer(F1 ~ (phoneme|individual) + (1|word) + frequency, 
         data = nurse_female)
lme2 <- lmer(F2 ~ (phoneme|individual) + (1|word) + 
                   frequency + age + (1|zduration), 
         data = nurse_female)

我创建了随机效应的简单点图dotplot(ranef(lme1))，它为每个随机预测器创建了一个图。然而，我只对phoneme|individual的一个感兴趣，它看起来如下：

​

通常，我会使用grid.arrange()，但我不能让它只选择音素\个别情节。你知道怎么做吗？

Answer 1

(一个可重复的例子将是有用的，我希望这个例子能做你想要的.)。我认为这里的关键是要认识到，dotplot.ranef.mer方法返回一个情节列表：

library(lme4)
fm1 <- lmer(angle ~ (1|recipe) + (1|recipe:replicate), cake, REML= FALSE)
dd <- dotplot(ranef(fm1))
length(dd) ## 2

它们不一定与公式中的顺序相同：

names(dd) ## [1] "recipe:replicate" "recipe"          
print(dd[["recipe"]])
print(dd[["recipe:replicate"]])

所以你会想要像

f <- function(m) dotplot(ranef(m))[["individual"]]
gridExtra::grid.arrange(f(lme1),f(lme2))