R/extract.R

Defines functions extract

extract <- function(tb, dir){
  for(i in seq_along(dir)){
    tb %<>% dplyr::filter(name == !!rlang::parse_expr("dir[i]")) %>% dplyr::pull(value) %>% .[[1]]  
  }
  return(tb)
}

Try the BGPhazard package in your browser

Any scripts or data that you put into this service are public.

BGPhazard documentation built on Sept. 3, 2023, 5:09 p.m.