rm_tag(text.var, trim = TRUE, clean = TRUE, pattern = "(^|[^@\\w])@(\\w{1,15})\\b", replacement = "", extract = FALSE, ...)
TRUE
removes leading and trailing white
spaces.TRUE
extra white spaces and escaped
character will be removed.fixed = TRUE
) to be matched in the given
character vector.pattern
.TRUE
the person tags are extracted into a
list of vectors.gsub
.Returns a character string with person tags removed.
Remove/replace/extract person tags from a string.
## <strong>Not run</strong>: # 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" # ) # # rm_tag(x) # rm_tag(rm_hash(x)) # rm_tag(x, extract=TRUE) # ## <strong>End(Not run)</strong>
gsub