The option for the resample filter is :no-replacement not :replacement
This commit is contained in:
parent
e1295877e4
commit
c7c7cdd9f1
1 changed files with 4 additions and 4 deletions
|
@ -108,7 +108,7 @@
|
|||
(deftest make-filter-resample-unsupervised
|
||||
(let [ds (do (println "Loading instances from http://clj-ml.artifice.cc/iris.arff ...")
|
||||
(load-instances :arff "http://clj-ml.artifice.cc/iris.arff"))
|
||||
f (make-filter :resample-unsupervised {:dataset-format ds :seed 10 :size-percent 50 :replacement true})]
|
||||
f (make-filter :resample-unsupervised {:dataset-format ds :seed 10 :size-percent 50 :no-replacement true})]
|
||||
(is (= weka.filters.unsupervised.instance.Resample
|
||||
(class f)))))
|
||||
|
||||
|
@ -117,7 +117,7 @@
|
|||
(do (println "Loading instances from http://clj-ml.artifice.cc/iris.arff ...")
|
||||
(load-instances :arff "http://clj-ml.artifice.cc/iris.arff"))
|
||||
:class)
|
||||
f (make-filter :resample-supervised {:dataset-format ds :seed 10 :size-percent 50 :replacement true :bias 1})]
|
||||
f (make-filter :resample-supervised {:dataset-format ds :seed 10 :size-percent 50 :no-replacement true :bias 1})]
|
||||
(is (= weka.filters.supervised.instance.Resample
|
||||
(class f)))))
|
||||
|
||||
|
@ -207,7 +207,7 @@
|
|||
(deftest make-apply-filter-resample-unsupervised
|
||||
(let [ds (do (println "Loading instances from http://clj-ml.artifice.cc/iris.arff ...")
|
||||
(load-instances :arff "http://clj-ml.artifice.cc/iris.arff"))
|
||||
ds2 (make-apply-filter :resample-unsupervised {:seed 10 :size-percent 50 :replacement true} ds)]
|
||||
ds2 (make-apply-filter :resample-unsupervised {:seed 10 :size-percent 50 :no-replacement true} ds)]
|
||||
(is (= 75 (dataset-count ds2)))))
|
||||
|
||||
(deftest make-apply-filter-resample-supervised
|
||||
|
@ -215,7 +215,7 @@
|
|||
(do (println "Loading instances from http://clj-ml.artifice.cc/iris.arff ...")
|
||||
(load-instances :arff "http://clj-ml.artifice.cc/iris.arff"))
|
||||
:class)
|
||||
ds2 (make-apply-filter :resample-supervised {:seed 10 :size-percent 50 :replacement true :bias 1} ds)]
|
||||
ds2 (make-apply-filter :resample-supervised {:seed 10 :size-percent 50 :no-replacement true :bias 1} ds)]
|
||||
(is (= 75 (dataset-count ds2)))))
|
||||
|
||||
(deftest make-apply-filters-test
|
||||
|
|
Loading…
Reference in a new issue