#' @import dplyr
state_to_english <- function(listings) {
listings %>%
mutate(current_state = recode(current_state,
"Goede staat" = "good",
"Op te frissen" = "to be renovated",
"Uitstekende staat" = "excellent",
"Vernieuwd" = "renovated",
.default = NA_character_))
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.