TokyoRの以下の発表を見て面白そうだったので触ってみた.
Random Forest
library(randomForest) n <- nrow(iris) idx <- sample(n, n * 0.5) iris.learn <- iris[idx,] iris.test <- iris[-idx,] pred.forest <- predict(forest, newdata=iris.test, type="class") table(pred.forest,iris.test[,5])