When I learning C5.0 decision tree, I run the following code:
credit_cost <- C5.0(credit_train[-17], credit_train$default, costs = erro