# \donttest{
library(metan)
# All numeric variables
all <- corr_coef(data_ge2)
# Select variable
sel <-
corr_coef(data_ge2,
EP, EL, CD, CL)
sel$cor
# Select variables, partial correlation
sel <-
corr_coef(data_ge2,
EP, EL, CD, CL,
type = "partial")
sel$cor
# }
Run the code above in your browser using DataLab