testthat/old/tira_col.R

# retira colunas
tira_col <- function(x, tira = NULL){
  if(is.null(tira)){ tira <- c('X__1') }
  x <- select(x,-tira)
  return(x)
}
filipezabala/jurimetrics documentation built on Aug. 27, 2024, 7:07 a.m.