# \donttest{
library(dplyr)
# pps type is generic ======================================
pps_generic <- pps(iris)
pps_generic
# summary pps class
mat <- summary(pps_generic)
mat
# pps type is target_by =====================================
##-----------------------------------------------------------
# If the target variable is a categorical variable
# Using dplyr
pps_cat <- iris %>%
target_by(Species) %>%
pps()
pps_cat
# summary pps class
tab <- summary(pps_cat)
tab
##-----------------------------------------------------------
# If the target variable is a numerical variable
num <- target_by(iris, Petal.Length)
pps_num <- pps(num)
pps_num
# summary pps class
tab <- summary(pps_num)
tab
# }
Run the code above in your browser using DataLab