R/load.apps.R

Defines functions load.apps

load.apps <- function(name, applib = getOption("applib")){
  if(missing(name)){
    stop("Please specify a name of your app.")
  }
  myapps <- list.apps(name=name, applib=applib, fullpath=TRUE);
  if(!length(myapps)){
    stop("No apps '", name, "' found in this library.");
  } 
  inlib(myapps,
    library(name, character.only=TRUE)
  )
  invisible();  
}
jeroenooms/apps documentation built on May 17, 2017, 6:17 p.m.