replace_tag: Replace Handle Tags

In textclean: Text Cleaning Tools

Description

Replaces Twitter style handle tags (e.g., '@trinker').

Usage

replace_tag(x, pattern = qdapRegex::grab("rm_tag"), replacement = "", ...)

Arguments

x	The text variable.
pattern	Character time regex string to be matched in the given character vector.
replacement	A function to operate on the extracted matches or a character string which is a replacement for the matched pattern.
...	ignored.

Value

Returns a vector with tags replaced.

Examples

x <- c("@hadley I like #rstats for #ggplot2 work.",
    "Difference between #magrittr and #pipeR, both implement pipeline operators for #rstats: 
        http://renkun.me/r/2014/07/26/difference-between-magrittr-and-pipeR.html @timelyportfolio",
    "Slides from great talk: @ramnath_vaidya: Interactive slides from Interactive Visualization 
        presentation #user2014. http://ramnathv.github.io/user2014-rcharts/#1"
)

replace_tag(x)
replace_tag(x, replacement = '<<TAG>>')
replace_tag(x, replacement = '$3')

## Replacement with a function
replace_tag(x, 
    replacement = function(x){
        gsub('@', ' <<TO>> ', x)
    }
)

Example output

[1] " I like #rstats for #ggplot2 work."                                                                                                                                         
[2] "Difference between #magrittr and #pipeR, both implement pipeline operators for #rstats: \n        http://renkun.me/r/2014/07/26/difference-between-magrittr-and-pipeR.html "
[3] "Slides from great talk: : Interactive slides from Interactive Visualization \n        presentation #user2014. http://ramnathv.github.io/user2014-rcharts/#1"                
[1] "<<TAG>> I like #rstats for #ggplot2 work."                                                                                                                                         
[2] "Difference between #magrittr and #pipeR, both implement pipeline operators for #rstats: \n        http://renkun.me/r/2014/07/26/difference-between-magrittr-and-pipeR.html <<TAG>>"
[3] "Slides from great talk: <<TAG>>: Interactive slides from Interactive Visualization \n        presentation #user2014. http://ramnathv.github.io/user2014-rcharts/#1"                
[1] "hadley I like #rstats for #ggplot2 work."                                                                                                                                                  
[2] "Difference between #magrittr and #pipeR, both implement pipeline operators for #rstats: \n        http://renkun.me/r/2014/07/26/difference-between-magrittr-and-pipeR.html timelyportfolio"
[3] "Slides from great talk: ramnath_vaidya: Interactive slides from Interactive Visualization \n        presentation #user2014. http://ramnathv.github.io/user2014-rcharts/#1"                 
[1] " <<TO>> hadley I like #rstats for #ggplot2 work."                                                                                                                                                  
[2] "Difference between #magrittr and #pipeR, both implement pipeline operators for #rstats: \n        http://renkun.me/r/2014/07/26/difference-between-magrittr-and-pipeR.html  <<TO>> timelyportfolio"
[3] "Slides from great talk:  <<TO>> ramnath_vaidya: Interactive slides from Interactive Visualization \n        presentation #user2014. http://ramnathv.github.io/user2014-rcharts/#1"                 

textclean documentation built on May 2, 2019, 7:22 a.m.