8.51 Visualize the tuned decision tree (regression)

reg_tree_final_fit %>%
     extract_fit_engine() %>%
     rpart.plot(roundint = FALSE)