R 尝试查看emmeans中的交互图-emmip中缺少参数导致的错误？

我下面是使用emmeans检查交互的小插曲

但我使用的是我自己的数据集（all.det）——它确实具有重要的交互作用。 all.det包含12个变量的1621个观测值，其中3个是因子。 我确实试图创建一个可重复生产的示例，但还没有找到如何创建一个具有所有重要交互的示例。所以我希望这个描述足以让某人指出我的错误所在

我正在使用

library(data.table)
library(car)
library(emmeans)

我用这个代码进行方差分析

距离km是一种数值计算方法，IDGroup和可视性是影响因素

model = lm(DistanceKm ~ Method * IDGroup * Sightability,
           data=all.det[(IDGroup == "Whale" | IDGroup == "Dolphin")
                        & DistanceKm <=5])
Anova(model, type="II")

但我有这些错误

Error in if (!all(chk == tbl)) stop("Data appear to be randomized -- ",  : 
  missing value where TRUE/FALSE needed
Error in ref_grid(object, ...) : 
  Perhaps a 'data' or 'params' argument is needed

我确实试图创建我的数据的子集

sub=all.det[(IDGroup == "Whale" | IDGroup == "Dolphin") & DistanceKm <=5]

我得到了相同的方差分析结果（正如预期的那样），但现在我也能够生成没有错误的交互图

emmip(model, Method ~ Sightability | IDGroup)

我只收到一条关于缺少值的警告

---

调用emmip时是否遗漏了什么？

我收到了类似的警告，然后发现我在数据帧中错误地标记了我的一个因素。检查您的数据帧，确保没有任何不应该存在的NA值。

我感到困惑，因为

all.det[（IDGroup==“Whale”| IDGroup==“Dolphin”）&DistanceKm感谢您的关注。我相信我正在使用原始代码选择行。我确实尝试过在其中添加逗号（如果我的问题是这样一个打字错误，那就太好了！），但得到相同的结果。两者都减少了数据表中的行数。
model=lm(DistanceKm ~ Method * IDGroup * Sightability, data=sub)
Anova(model, type="II")

emmip(model, Method ~ Sightability | IDGroup)