Replace Internet Slang
Replaces Internet slang.
replace_internet_slang(x, slang = paste0("\\b",
lexicon::hash_internet_slang[[1]], "\\b"),
replacement = lexicon::hash_internet_slang[[2]], ignore.case = TRUE, ...)x |
The text variable. |
slang |
A vector of slang strings to replace. |
replacement |
A vector of string to replace slang with. |
ignore.case |
logical. If |
... |
Other arguments passed to |
Returns a vector with names replaced.
x <- c(
"Marc the n00b needs to RTFM otherwise ymmv.",
"TGIF and a big w00t! The weekend is GR8!",
"Will will do it",
'w8...this PITA needs me to say LMGTFY...lmao.',
NA
)
replace_internet_slang(x)
replace_internet_slang(x, ignore.case = FALSE)
replace_internet_slang(x, replacement = '<<SLANG>>')
replace_internet_slang(
x,
replacement = paste0('{{ ', lexicon::hash_internet_slang[[2]], ' }}')
)Please choose more modern alternatives, such as Google Chrome or Mozilla Firefox.