## Suppose 'val' represent the correct validation set labels
## and 'predictions' the predicted labels according to an SVM model
val <- c(rep(0,8),rep(1,4))
predictions <- c(rep(0,6),1,1,rep(1,3),0)
perfMetrics <- metrics(classLbls=val, predLbls=predictions)
Run the code above in your browser using DataLab