How do you extract the undersampled data from caret in R?

Question

I created a random forest model using the train function from caret with the following train control parameters:

    ctrl <- trainControl(samp