mt2a <- mtcars[c("am", "cyl", "mpg")]
mt2b <- mtcars[v(am, cyl, mpg)]
identical(mt2a, mt2b) # TRUE
# silly demo
mtlabs <- mtcars
mtlabs <- add_val_labs(
data = mtlabs,
vars = "am",
vals = c(0, 1),
labs = v(a, m) # equivalent to c("a", "m")
)
get_val_labs(mtlabs)
Run the code above in your browser using DataLab