replace_internet_slang: Replace Internet Slang

Description Usage Arguments Value Examples

View source: R/replace_internet_slang.R

Description

Replaces Internet slang.

Usage

1
2
3
4
5
6
7
replace_internet_slang(
  x,
  slang = paste0("\\b", lexicon::hash_internet_slang[[1]], "\\b"),
  replacement = lexicon::hash_internet_slang[[2]],
  ignore.case = TRUE,
  ...
)

Arguments

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 TRUE the case of slang will be ignored (replacement regardless of case).

...

Other arguments passed to replace_tokens.

Value

Returns a vector with names replaced.

Examples

 1
 2
 3
 4
 5
 6
 7
 8
 9
10
11
12
13
14
15
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]], ' }}')
)

trinker/textclean documentation built on Nov. 3, 2021, 7:20 p.m.