df <- dplyr::tibble(
c1 = labelled(c("M", "M", "F"), c(Male = "M", Female = "F")),
c2 = labelled(c(1, 1, 2), c(Yes = 1, No = 2))
)
val_labels(df$c1)
val_labels(df$c1) %>% names_prefixed_by_values()
val_labels(df)
val_labels(df) %>% names_prefixed_by_values()
Run the code above in your browser using DataLab