Remove/Replace/Extract City, State, & Zip

Usage

rm_city_state_zip(text.var, trim = !extract, clean = TRUE, pattern = "@rm_city_state_zip", replacement = "", extract = FALSE, dictionary = getOption("regex.library"), ...)

Arguments

text.var
The text variable.
trim
logical. If TRUE removes leading and trailing white spaces.
clean
trim logical. If TRUE extra white spaces and escaped character will be removed.
pattern
A character string containing a regular expression (or character string for fixed = TRUE) to be matched in the given character vector. Default, @rm_city_state_zip uses the rm_city_state_zip regex from the regular expression dictionary from the dictionary argument.
replacement
Replacement for matched pattern.
extract
logical. If TRUE the city, state, & zip are extracted into a list of vectors.
dictionary
A dictionary of canned regular expressions to search within if pattern begins with "@rm_".
...
Other arguments passed to gsub.

Value

Returns a character string with city, state, & zip removed.

Description

Remove/replace/extract city (single lower case word or multiple consecutive capitalized words before a comma and state) + state (2 consecutive capital letters) + zip code (5 digits or 5 + 4 digits) from a string.

Examples

x <- paste0("I went to Washington Heights, NY 54321 for food! ", "It's in West ven,PA 12345, near Bolly Bolly Bolly, CA12345-1234!", "hello world") rm_city_state_zip(x)
[1] "I went to for food! It's in West , near !hello world"
rm_city_state_zip(x, extract=TRUE)
[[1]] [1] "Washington Heights, NY 54321" "ven,PA 12345" "Bolly Bolly Bolly, CA12345-1234"