R/match-vars.R

match_vars <- function(vars, data) {
  if (is.numeric(vars)) return(vars)
  match(vars, names(data))
}
olascodgreat/samife documentation built on May 13, 2019, 6:11 p.m.