r matriz de desempenho para matriz de confusão

# Get performance metrics for the confusion matrix
summary(confusion, event_level = "second")
Successful Salmon