## create classification task and use linear discriminant analysis for classification
task = makeClassifTask(data = iris, target = "Species")
lrn = makeLearner("classif.lda")
## set up training and test data
n = nrow(iris)
mixed.set = sample(1:n)
training.set = mixed.set[1:(n/2)]
test.set = mixed.set[(n/2 + 1):n]
## train model
mod = train(lrn, task, subset = training.set)
## get predictions and show calculate confusion matrix
pred = predict(mod, newdata = iris[test.set, ])
print(getConfMatrix(pred))
print(getConfMatrix(pred, relative = TRUE))
Run the code above in your browser using DataLab