## The data was built with the following command
airq_rf <- rfsrc(Ozone ~ ., data = airquality, na.action = "na.impute")
airq_vs <- var.select(airq_rf)
gg_dta <- gg_minimal_depth(airq_vs)
plot(gg_dta)
Run the code above in your browser using DataLab