+
+# 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