data(iris)
x <- subset(iris, select = -Species)
y <- iris$Species
method <- c("randomForest","svm","pcalda","knn")
pars <- valipars(sampling="boot", niter = 10, nreps=10)
res <- maccest(x, y, method=method, pars=pars,
comp="anova")
res
res$acc.iter
mc.norm(res$acc.iter)
Run the code above in your browser using DataLab