R/run_bnvd.R

In CedricMondy/afbBNVD: Explore the BNVD

#' Run the BNV-d Shiny application
#'
#' @importFrom rmarkdown run
#' @export
run_bnvd <- function() {
    appPath <- system.file("appShiny/bnvd_dashboard.Rmd", package = "afbBNVD")

    run(appPath, render_args = list(encoding = "UTF-8"))
    }