df <- data.frame(
gender = c("male", "F", "male", "female"),
status = c("single", "Married", "oo", "M"),
stringsAsFactors = FALSE
)
lookup <- c(
"male" = "Male",
"M" = "Married",
"oo" = "Widow",
"female" = "Female",
"F" = "Female"
)
df_recode <- recode_data(df, lookup)
print(df_recode)
Run the code above in your browser using DataLab