# appDir <- system.file("shiny-examples", "myapp", package = "GeoPressureR")
# appDir <- "./inst/geopressureviz/"
# source(glue::glue(appDir,'global'), local = TRUE)
# source(glue::glue(appDir,'ui.R'), local = TRUE)
# source(glue::glue(appDir,'server.R'), local = TRUE)
#
# shinyApp(ui, server)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.