How do I efficiently modify a a single string (which is to be part of a column) according to a predefined dictionary (named list) of character mappings?
Suppose I had the mapping:
map <- list('a' = 'u', 'e' = 'i', 'i' = 'o', 'o' = 'a', 'u' = 'e')
And the character vector:
imp_text <- c('aei', 'ou ei', 'iua oe')
I would like to apply some function to imp_text and obtain
c('uio' , 'ae io', 'oeu ai')
Where each character was translated according to the associations defined in map. In the future, map might contain a mapping for the entire alphabet, and imp_text might contain a very large amount of entries. How do I accomplish this? I would prefer a tidyverse approach but anything's welcome.
chartr(paste0(names(map), collapse=""), paste(map, collapse=""), imp_text)
# [1] "uio" "ae io" "oeu ai"