Fix regression

[agghoo.git] / test / compareToCV.R

diff --git a/test/compareToCV.R b/test/compareToCV.R
index d3b9011..a124dd2 100644 (file)
--- a/test/compareToCV.R
+++ b/test/compareToCV.R
@@ -37,6 +37,8 @@ standardCV <- function(data, target, task = NULL, gmodel = NULL, params = NULL,
           }
         }
       }
+      else
+        mean(abs(y1 - y2))
     }
   }