Multiple Web application R shiny

[mosman2]

Assuming I have 2 action buttons as a starting page 'Client' & 'Employee' as shown below, and for each option, there is a different web application.

when the user clicks the 'Client' button I need the following code to be run:

library(shiny)

ui <- 
navbarPage(
  "The Client Web",
  tabPanel("Section1 "),
  tabPanel(" Section1 2")
)

server <- function(input, output,session){

}

shinyApp(ui = ui, server = server)

and when the user clicks the 'Employee' button I need the following code to be run:

library(shiny)

ui <- 
navbarPage(
  "The Employee Web",
  tabPanel("Component 1"),
  tabPanel("Component 2"),
  tabPanel("Component 3")
)

server <- function(input, output,session){

}

shinyApp(ui = ui, server = server)

I need both of the web applications in one app depending on the type of the user either 'Client' or 'Employee'. Thank you in advance!

[nirgrahamuk]

You might use modules.
Chapter 19 Shiny modules | Mastering Shiny (mastering-shiny.org)

[mosman2]

Thank you very much!