R/rfsApp.R

Defines functions rfsApp

Documented in rfsApp

#' @title Launch interactive data analysis
#' @description Launch interactive analysis of flood seasonality changes 
#'              along the Rhine river and tributaries.
#'              The R session is blocked during usage, close the app to re-enable
#'              console usage.
#' @author Berry Boessenkool, \email{berry-b@@gmx.de}, Aug 2017
#' @seealso \code{shiny::\link[shiny]{runApp}}, \code{\link{qdoyVisPeriods}}
#' @keywords iplot
#' @importFrom shiny runApp
#' @importFrom sp plot
#' @export
#' @examples
#' # rfsApp()
#' @param app   Folder specifying which app to run. 
#'              DEFAULT: "rhine" (the main seasonality change app)
#' @param \dots Arguments passed to \code{shiny::\link[shiny]{runApp}}
#'
rfsApp <- function(app="rhine", ...)
{
appDir <- system.file("shinyapps", app, package="rfs")
if(appDir=="") stop("Could not find shinyapp directory. Try re-installing 'rfs'.", call.=FALSE)
shiny::runApp(appDir, ...)
}
brry/rfs documentation built on May 24, 2019, 3:05 a.m.