R/funfact.R

funfact <- function(f, ...){
  add_args <- list(...)
  function(...){
    ags <- list(...)
    ags <- c(ags, add_args)
    return(do.call(f, ags))
  }
}
keynmol/superdrive documentation built on May 20, 2019, 9:20 a.m.