#' Function to run NicheToolBox shinyApp
#' @description This function initiates NicheToolBox GUI
#' @export
#' @examples
#' # Run nichetoolbox package
#' # run_nichetoobox()
run_nichetoolbox <- function(){
app_path <- system.file("shinyApp",package = "nichetoolbox")
return(shiny::runApp(app_path))
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.