I read an SPSS file and apply labels. library (haven) library (expss) nps2020 <- haven::read_spss("NPS Data_2020_28 Dec 2020.sav") nps2020 <- add_labelled_cl