# Iris data
data(iris)
x <- subset(iris, select = -Species)
y <- iris$Species
method <- c("randomForest","svm","knn")
pars <- valipars(sampling="cv", niter = 2, nreps=5)
tr.idx <- trainind(y, pars=pars)
res <- maccest(x, y, method=method, pars=pars,
comp="anova",kernel="linear")
res
boxplot(res)
Run the code above in your browser using DataLab