Получение сообщения об ошибке NA / NaN, несмотря на отсутствие пропущенных значений (с использованием R: tidyLPA)

Question

Я использую tidyLPA в R. Я последовал примеру, приведенному здесь .Вот пример кода, который они дают:

library(tidyLPA)
library(dplyr)
library(mclust)    
data(pisaUSA15)

pisaUSA15[1:100, ] %>%
  select(broad_interest, enjoyment, self_efficacy) %>%
  single_imputation() %>%
  estimate_profiles(3)

Это работает нормально и дает мне следующие результаты:

tidyLPA analysis using mclust: 

 Model Classes AIC     BIC     Entropy prob_min prob_max n_min n_max BLRT_p
 1     3       630.957 667.430 0.885   0.903    0.973    0.130 0.680 0.010

Однако, когда я запускаю его со своими собственными данными, используя следующиекод:

data[1:100, ] %>%
  select(V1, V2, V3, V4) %>%
  single_imputation() %>%
  estimate_profiles(3)

Я получаю следующее сообщение об ошибке:

Error in mdpwst[i]:mdpwfin[i] : NA/NaN argument

Я не понимаю, почему я получаю сообщение NA / NaN, когда я удалил все наблюдения с отсутствующимизначения с:

data = data[complete.cases(data),]

Это никогда не происходило со мной с любым другим пакетом, и просеивание подобных вопросов здесь на stackoverflow не дало ответов.Я не уверен, как решить эту проблему, и просто просмотр наборов данных не показывает сразу идентифицируемых причин того, почему один набор данных работает, а другой - нет.

Answer 1

Я отвечаю на свой вопрос здесь, Проблема возникла из команды single_imputation() %>%. Как указано здесь на Github , команда используется, когда отсутствуют значения. Поскольку я удалил все пропущенные значения, команда не нужна и фактически вызывает ошибку!

Как только я удалил это, чтобы иметь:

data[1:100, ] %>%
  select(V1, V2, V3, V4) %>%
  estimate_profiles(3)

Код работает нормально!