Skip to content

Instantly share code, notes, and snippets.

@stevenworthington

stevenworthington/extract_twitter_text.R

Created July 11, 2013 19:47
Show Gist options
  • Save stevenworthington/5978612 to your computer and use it in GitHub Desktop.
Save stevenworthington/5978612 to your computer and use it in GitHub Desktop.
Download ZIP
Raw
extract_twitter_text.R
# list with character vectors
text <- list(a = "all day I play @sworth with R",
b = "all night I play @sworth with R")
# extract letters after "@" in a single character vector
sub("^.*@(\\w+).*", "\\1", text$a)
# extract letters after "@" in a list of character vectors
gsub("^.*@(\\w+).*", "\\1", text)
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment