How to obtain confusion matrix using caret package?

Question

I was trying to analyse example provided by caret package for confusionMatrix i.e.

lvs <- c("normal", "abnormal")
truth &l