Как сделать Shinydashboard с «menuItem» в другой Shinydashboard?

Question

Я хочу получить доступ к приборной панели «sample1», нажав на menuItem в приборной панели «sample».

код для примерной приборной панели: библиотека (блестящая) библиотека (shinydashboard)

ui <- shinyUI(
dashboardPage(skin = "red",
    dashboardHeader(title = "Sample"),
    dashboardSidebar(
    sidebarMenu(
    menuItem("Cancer Screening", href = "C:/Users/xyz/Documents/My 
    Dashboard/DESH.R"))),
dashboardBody()))
server <- function(input, output) {}
shinyApp(ui,server)

коддля sample1: библиотечная (блестящая) библиотека (shinydashboard)

ui <- shinyUI(
dashboardPage(
dashboardHeader(title = "Sample1"),
dashboardSidebar(
    sidebarMenu(
    menuItem("patient", href = "C:/Users/velumani_d/Documents/My 
    Dashboard/DESH.R"))),
dashboardBody()))

server <- function(input, output) {}

shinyApp(ui,server)

Может кто-нибудь помочь мне с кодом, связывающим панель «sample1» с «menuItem» в панели «sample», пожалуйста?

Большое спасибо.