r - How do you link various Shiny dashboards together?

Question

As you build various Shiny dashboards for your colleagues, what is the best way to "link" them all together so people can navigate between the team apps?

One approach

I am currently planning to add to each app, an "about" page tab, with the URLs/names of the other apps for people to jump to.

Example of ui for tabPanel("about", uiOutput("aboutui")):

output$aboutui <- renderUI({
  tabPanel(title = "Our other apps",
           fluidRow(helptext("Please go take a look at our other team apps:")),  
           fluidRow(a("Foo App", href="https://test.shinyapps.io/fooapp", target="_blank")),
           fluidRow((a("Bar App", href="https://test.shinyapps.io/barapp", target="_blank"))
           )          
})

This will of course be a pain to update as the team builds more apps, as then new changes have to be replicated to all the other apps.

Better way?

Can others recommend a better approach?

question from:https://stackoverflow.com/questions/65903253/how-do-you-link-various-shiny-dashboards-together

Answer 1

Waitting for answers