R/loadData.R

In sportiellomike/fluximplied2: Pathway analysis software utilizing rate limiting steps

#' loadData
#'
#'@description used in shiny app
#'
#' @return
#' @export
#'
loadData <- function() {
  if (exists("responses")) {
library(Cairo)
library(ggplot2)
library(shiny)
library(shinythemes)
library(viridis)
    responses
  }
}