реактивная панель tabPanel в меню навигации в Shiny

Я новичок на этом форуме. У меня вопрос по R Shiny. Я просмотрел некоторые обсуждения на этом форуме, но ответы (R Shiny - добавить tabPanel к tabsetPanel динамически (с использованием renderUI)) не соответствует тому, что я ищу.

Я пытаюсь добавить несколько tabPalnels в navbarMenu с взаимодействием: например, я выбираю каталог и перечисляю, сколько файлов находится в нем и каковы их имена. тогда я хотел бы сделать tabPanel в navbarMenu, которые имеют имя файлов в каталоге

ex: if dir = c:/charlotte/RY list.files(dir) = c(fichier1.csv, fichier2.csv)

Я бы хотел, чтобы имена 2-х вкладок из navbarMenu назывались fichier1.csv и fichier2.csv. Пробую, но безрезультатно. Я даю вам свой код:

shinyUI(navbarPage("raster analysis",
               tabPanel("Analysis parameters",
                        actionButton("goButton","load session to analyze"),
                        textOutput("session")
               ),
               navbarMenu("NISTs",
                            tabPanel("Set up"

                            ),
                            tabPanel("About"
                            )

               ),
               navbarMenu("Samples",
                          tabPanel("Set up"
                          ),
                          tabPanel("About"
                          )
               ))


shinyServer(function(input, output) {


observe({    
if(input$goButton > 0){    
  output$session = renderUI({
    list.files(choose.dir(),pattern="\\.csv$")
  }) } })})

У вас есть идея на эту тему? Является ли это возможным ? Спасибо большое !! С