R/match_states.R

Defines functions st_to_state state_to_st

state_to_st <- function(x){
  c(state.abb, 'DC')[match(x, c(state.name, 'District of Columbia'))]
}


st_to_state <- function(x){
  c(state.name, 'District of Columbia')[match(x, c(state.abb, 'DC'))]
}
sbha/cleanstreets documentation built on March 13, 2021, 12:44 p.m.