RWeka фильтр ReplaceMissingValues ​​не работает - PullRequest
0 голосов
/ 14 мая 2018

В настоящее время я пытаюсь исследовать Weka из R, используя RWeka. Я пытаюсь заменить некоторые пропущенные значения (которые я намеренно добавил) фильтром без присмотра ReplaceMissingValues, но когда я его применяю, возвращается только часть кадра данных, в данном случае только 27 записей.

Это код, который я использую

data<-select(iris,Species,everything())

#ADDING THE MISSING VALUES
miss<-make_Weka_filter("weka.filters.unsupervised.attribute.ReplaceWithMissingValue")
data.miss<-miss(data,control=Weka_control(P=.3)) %>% select(Species,everything())

#REPLACING BY MEAN
found<-make_Weka_filter("weka.filters.unsupervised.attribute.ReplaceMissingValues")
data.found<-found(data.miss)

nrow(data)
nrow(data.miss)
nrow(data.found)

Есть идеи здесь?

1 Ответ

0 голосов
/ 15 мая 2018

Я проверял это у сопровождающего пакета.это ошибка, но есть обходной путь, фильтр игнорирует пропущенные значения (что-то странное для этого особого фильтра), чтобы получить полный кадр данных, вы можете сделать следующее

found<-make_Weka_filter("weka.filters.unsupervised.attribute.ReplaceMissingValues")
data.found<-found(data.miss,na.action=na.pass)
...