运行 emmeans 的问题(分配 '.Last.ref_grid' 时出错)

Problem with running emmeans (error in assign '.Last.ref_grid')

每当我尝试用估计的边际均值跟踪组间方差分析的两种方法时,运行ning 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")

Returns:

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

你应该看到最后保存的是什么。这可能是一个线索。并尝试删除它。