shiny_panel_help <- fluidPage(
  #withMathJax(includeMarkdown("musicatk.Rmd"))
  #mainPanel(includeHTML("https://rdrr.io/github/campbio/musicatk/f/vignettes/musicatk.Rmd")
  #includeHTML("C:/Users/tongt/Documents/GitHub/musicatk/inst/shiny/musicatk_help.html")
  #mainPanel(includeHTML(paste0(getwd(), "/../../docs/index.html")))
)
