R/launchApp.R

In AFIT-R/instaExtract: The instaExtract Package Aims to Provide Analysts a Method for Pulling Information from Instagram and a Foundation for Future Analytic Functions to be Created and Shared

#'@title Launch App
#'
#'@description Launches the Shiny App for the instaExtract Package
#'
#'@param dir   A file directory for the app
#'@param ...   Additional options passed to a shinyAppDir
#'
#'@return N/A
#'
#'@examples
#'\dontrun{ launchApp()}
#'
#'@export
#'
#'
#'@import DT
#'@importFrom shiny shinyAppDir
#'@import shinythemes

launchApp <- function(dir,...){

  app_dir <- system.file('apps', 'myFirstApp', package = 'instaExtract')

  shiny::shinyAppDir(app_dir)

}