R/sswitch.R

Defines functions stringswitch

# Vectorized switch function 
#'@export
stringswitch <- function(X, ...) { 
  sapply(X, function(x) { 
    switch(x, ...)
  })
}
alexgenin/miscutils documentation built on Oct. 28, 2019, 12:25 p.m.