R/add.r

In mkoohafkan/figr: Simple figure and table indexer for use with document generation.

add <- structure(function(key, figure, caption, type){
  env = specenv(type)
  # index the figure
  assign(key, figure, envir=env)
  # add the caption
  addcaption(key, caption, envir=env)
  invisible(NULL)
}, ex=function(){
})