inst/appweb/include_ui/utils_ui.R

In carlosperezoft/JENKINS: Visualizacion de alto nivel para la interpretacion de Modelos de Ecuaciones Estructurales

# autor -------------------------------------------------------------------
# carlos.perez7@udea.edu.co
# 21/07/2018 1:35:51 p. m.
#
# NOTA: Esta opcion de invicacion de menu de ayuda es generica usando el tipo
# predefinido de "notifications". Es limitado pues no permite usar un TAB panel o una OututUI.
# -- Se puede en su defecto invocar una pagina HTML externa con el window.open(..).
# -- Tambien se puede invocar un elemento en "localhost" ubicado en la carpeta "www" de la
#    la aplicacion WEB Shiny dashboard (en este caso se probo con /ayuda/*)
#
msgHelpMenu <- dropdownMenu(
  type = "notifications",
  icon = icon("question-circle"),
  badgeStatus = NULL,
  headerText = "AYUDA GENERAL semviz.mockup:",

  notificationItem("AYUDA LOCALHOST", icon = icon("file"),
        href = "javascript:window.open('/ayuda/rmarkdown_test.html', '_blank')"),
  notificationItem("Modelos SEM, TUTORIAL", icon = icon("gears"),
        href = "javascript:window.open('http://www.structuralequations.org/', '_blank')"),
  notificationItem("R lavaan, TUTORIAL", icon = icon("paint-brush"),
        href = "javascript:window.open('http://lavaan.ugent.be/', '_blank')"),
  notificationItem("shinydashboard, Estructura UTIL!", icon = icon("desktop"),
        href = "javascript:window.open('https://rstudio.github.io/shinydashboard/structure.html', '_blank')"),
  notificationItem("SALIR...", icon = icon("gear"),
                   href = "javascript:setTimeout(function(){window.close();},500);")

)