Replace First/Last Names
Replaces first/last names.
replace_names(x, names = textclean::drop_element(gsub("(^.)(.*)",
"\\U\\1\\L\\2", c(lexicon::freq_last_names[[1]],
lexicon::common_names), perl = TRUE), "^([AIU]n|[TSD]o|H[ea]Pa|Oh)$"),
replacement = "", ...)x |
The text variable. |
names |
A vector of names to replace. This may be made more custom through a vector provided from a named entity extractor. |
replacement |
A string to replace names with. |
... |
Other arguments passed to
|
Returns a vector with names replaced.
x <- c(
"Mary Smith is not here",
"Karen is not a nice person",
"Will will do it",
NA
)
replace_names(x)
replace_names(x, replacement = '<<NAME>>')Please choose more modern alternatives, such as Google Chrome or Mozilla Firefox.