mcar_test 的外部函数调用 (arg 2) 中的 NA/NaN/Inf 错误

如何解决mcar_test 的外部函数调用 (arg 2) 中的 NA/NaN/Inf 错误

我是新来的，所以我希望我能以适当的方式提问。我有一个数据集 ( data_a )，我正在尝试通过 R 中包 mcar_test() 中的函数 naniar 进行 MCAR-Test。我发现它不起作用一旦我用 NA 替换了空条目。替换前，该功能有效。

我试图消除仅包含 NA 值的行。但结果还是一样。所有 NA 似乎都已正确编码，但该功能仍然无法与它们一起使用。

这是我的科迪：

library(naniar)
data_a <- read.csv("/Users/karo/Desktop/R/AG1/Daten/group_a.csv")
data_a <- data_a[,-c(2:7,9,145:153)]
mcar_test(data_a)#removing rows that only contain NA
data_a[data_a == "N/A" ] <- NA 
#the test still works
data_a[data_a == "" ] <- NA 
mcar_test(data_a)#the function doesn't work
data_a <- data_a[data_a$id != 1 & data_a$id != 21 & data_a$id != 31 &
                   data_a$id != 261 & data_a$id != 311 & 
                   data_a$id != 401,data_a$id != 501& data_a$id != 481,] 
mcar_test(data_a)#the function doesn't work

我总是得到 Error in norm::em.norm(s,showits = FALSE) : NA/NaN/Inf in foreign function call (arg 2) .我使用 is.infinite() 和 is.nan() 来测试部分数据是无限还是 NaN，但没有。

我的数据集可以在这里找到：https://osf.io/szg8h/

Here 是我完成上述所有 NA 清理后数据集的前 10 行。

我希望这是对问题的一个很好的描述，这是一个可重现的例子。

感谢您的帮助！