我目前正在尝试使用 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)
这里有什么想法吗?