# copy mtcars to mt2 and assign various types of value labels
mt2 <- mtcars
# add 1-to-1 value labels
mt2 <- add_val_labs(
data = mt2,
vars = "am",
vals = c(0, 1),
labs = c("automatic", "manual")
)
has_val_labs(mt2, am) # TRUE, it does
has_m1_labs(mt2, am) # FALSE, they are NOT add_m1_lab()-style
has_quant_labs(mt2, am) # FALSE, they are NOT add_quant_labs() -style
# add many-to-1 value labels
mt2 <- add_m1_lab(
data = mt2,
vars = "gear",
vals = 4:5,
lab = "4+"
)
has_val_labs(mt2, gear) # TRUE, it does
has_m1_labs(mt2, gear) # TRUE, they ARE add_m1_lab()-style
has_quant_labs(mt2, gear) # FALSE, they NOT not add_quant_labs() -style
# add quartile-based numerical range value labels
mt2 <- add_quant_labs(
data = mt2,
vars = "disp",
qtiles = 4
)
has_val_labs(mt2, disp) # TRUE, it does
has_m1_labs(mt2, disp) # FALSE, they are NOT add_m1_lab()-style
has_quant_labs(mt2, disp) # TRUE, they ARE add_quant_labs() -style
Run the code above in your browser using DataLab