Runs clean_names on df and stores each
column's original name as a labelled variable label, so the
human-readable original isn't lost when the column name itself becomes
machine-friendly.
Value
A tibble with cleaned column names and the original names stored
as variable labels (see var_label).
Examples
df <- tibble::tibble(
`name with spaces` = 1:10,
`special * characters` = LETTERS[1:10]
)
clean_names_keep_labels(df)
#> # A tibble: 10 × 2
#> name_with_spaces special_characters
#> <int> <chr>
#> 1 1 A
#> 2 2 B
#> 3 3 C
#> 4 4 D
#> 5 5 E
#> 6 6 F
#> 7 7 G
#> 8 8 H
#> 9 9 I
#> 10 10 J
