R/metaboVis.R

#' metaboVis
#' @param tool A string denoting which visualisation tool to use
#' @param ... Parameters to be passed on to selected tool
#' @importFrom utils capture.output
#' @examples
#' \dontrun{
#' metaboVis('PCA')
#' }
#' @export

metaboVis <- function(tool,...){
  tool <- get(tool)
  suppressWarnings(
    suppressMessages(
      capture.output(
        tool(...)
      )
    )
  )
  return()
}
jasenfinch/metaboVis documentation built on May 7, 2019, 7:57 a.m.