xgb_fit <- extract_fit_parsnip(xgb_last_fit) vip(xgb_fit, geom = "point", num_features = 12)
Stop parallel cluster
