Question

我正在尝试使用RWeka与来自R的Weka进行一些探索。我正在尝试使用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)

这里有什么想法吗？

Answer 1

我检查了包维护者。它是一个Bug，但是有一个解决方法，过滤器忽略了缺失的值（对于这个特殊的过滤器来说很奇怪），因为它可以获得完整的数据帧，你可以执行以下操作

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

RWeka过滤器ReplaceMissingValues不起作用

1 个答案: