运行 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
你应该看到最后保存的是什么。这可能是一个线索。并尝试删除它。
每当我尝试用估计的边际均值跟踪组间方差分析的两种方法时,运行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
你应该看到最后保存的是什么。这可能是一个线索。并尝试删除它。