data(loanData)
res <- loanDefaultPrediction(t(as.matrix(loanData[,-4])), # col 1 to 3, transposed
loanData[, 4], # col 4 is the target
0.25) # retain 25% for testing
str(res)
res$report
Run the code above in your browser using DataLab