Я использую функцию npudens в пакете np для R.
Я пытаюсь найти функцию плотности ядра многомерного набора данных и плотностиоценивается в каждой из 632 баллов для проведения анализа условной эффективности.
У меня есть 4 непрерывных фиктивных переменных, и размер моей выборки составляет 632 наблюдения.
Я использую приведенную ниже функцию в R.
kerz <- npudens(bws=bw_cx[i,], cykertype="epanechnikov", cxkertype="epanechnikov",
oxkertype="liracine", tdat=tdata, edat=dat)
В более ранних версиях это работало нормально, поскольку я смог получить необходимые оценки плотности с помощью kerz$dens.
В более новой версии и в Rstudio Cloud я получаю ошибку:
Ошибка в предупреждении if (any (a <= 0)) (paste («переменная», которая (a <= 0), «кажется постоянной»): пропущенное значение где TRUE / FALSErequired </p>
Я полагаю, что некоторые операторы if не оцениваются как TRUE или FALSE где-то в функции npudens. Я попытался отладить команду, изменив ее на следующую команду:
kerz2 <- npudens(bws=(bw_cx[i,]), ckertype="epanechnikov",, okertype="liracine",
tdat=tdata, edat=dat)
К сожалению, я получаю ту же ошибку.
Любая помощь / совет, как это исправить, будет принята с благодарностью.