library(tibble)
# Set ELIMINATION
x1 <-
px(population_gl) |>
px_elimination(tribble(~`variable-code`, ~elimination,
"gender", "T",
"age", "YES"
)
)
# Print ELIMINATION
px_elimination(x1)
# Remove ELIMINATION
x2 <- px_elimination(x1, NULL)
px_elimination(x2)
Run the code above in your browser using DataLab