# NOT RUN {
banana <- liquidData('banana-bc')
model <- rocSVM(Y~.,banana$train)
plotROC(model ,banana$test)
# or:
result <- test(model, banana$test)
plotROC(result, banana$test$Y)
model.ls <- lsSVM(Y~., banana$train)
result <- plotROC(model.ls, banana$test)
# }
Run the code above in your browser using DataLab