问题描述
每当我尝试使用估计的边际均值跟踪组 ANOVA 之间的两种方式时,我一直无法运行 emmeans 函数(来自 emmeans 包)。
一个简单的例子:
library(emmeans)
library(tidyverse)
df <- tibble(fct1 = factor(rep(1:3,10)),fct2 = factor(rep(2:1,15)),DV = rnorm(30,100,15))
model1 <- lm(DV ~ fct1 * fct2,df)
emmeans(model1,"fct1",by = "fct2")
返回:
Error in assign(".Last.ref_grid",object,inherits = TRUE) :
cannot change value of locked binding for '.Last.ref_grid'
无论我运行什么数据,总是出现相同的错误。
感谢您的帮助!
解决方法
这应该阻止它:
emm_options(save.ref_grid = FALSE)
这将阻止它保存最近创建的参考网格(或尝试,在您的情况下)。但是,尝试了解为什么会发生这种情况可能是值得的。如果你这样做:
.Last.ref_grid
您应该看到上次保存的是什么。这可能是一个线索。并尝试删除它。