test/README

   1 # Usage
   2 #######
   3
   4 source("compareToCV.R")
   5
   6 # rseed: >= 0 for reproducibility.
   7 compareToCV(data, target_column_index, rseed = -1)
   8
   9 # Average over N runs:
  10
  11 > compareMulti(iris, 5, N=100)
  12 [1] "error agghoo vs. cross-validation:"
  13 [1] 0.04266667 0.04566667
  14
  15 > compareMulti(PimaIndiansDiabetes, 9, N=100)
  16 [1] "error agghoo vs. cross-validation:"
  17 [1] 0.2579221 0.2645455
  18
  19 # WARNING: slow!
  20 > compareMulti(LetterRecognition, 1, N=100)
  21 [1] "error agghoo vs. cross-validation:"
  22 [1] 0.03870 0.04376