+++ /dev/null
-# Usage
-#######
-
-source("compareToCV.R")
-
-# rseed: >= 0 for reproducibility.
-compareToCV(data, target_column_index, rseed = -1)
-
-# Average over N runs:
-
-> compareMulti(iris, 5, N=100)
-[1] "error agghoo vs. cross-validation:"
-[1] 0.04266667 0.04566667
-
-> compareMulti(PimaIndiansDiabetes, 9, N=100)
-[1] "error agghoo vs. cross-validation:"
-[1] 0.2579221 0.2645455
-
-# WARNING: slow!
-> compareMulti(LetterRecognition, 1, N=100)
-[1] "error agghoo vs. cross-validation:"
-[1] 0.03870 0.04376