# NOT RUN {
 df = mtcars2[, ! names(mtcars2) %in% 'ids' ]
 m = randomForest::randomForest( disp ~ ., df)
 imp = m$importance
 pred = get_pdp_predictions(df, imp
                            , m
                            , degree = 3
                            , bins = 5)
# }
Run the code above in your browser using DataLab