如何在R Shiny中的navbarPage佈局中移動導航選項卡？

Question

我在R方面很有經驗，但在任何網絡開發方面都沒有。我正在嘗試使用Shiny。

我只是測試它，並有該UI的以下內容：

shinyUI(navbarPage("This is some awesome testing!!!", 
        tabPanel("Plot"), 
        tabPanel("Summary"), 
        navbarMenu("More", 
           tabPanel("Table"), 
           tabPanel("About") 
        ) 
)) 

這產生具有如下一個導航欄的網頁，但要注意的導航標籤是在頁面的中間。有沒有辦法將它移到左邊？所以它會一直在頁面的左側？

我剛剛注意到調整窗口的大小可以將它移動到某個位置，並有助於將它移動到左側，但有沒有辦法讓它「粘」到窗口的左側？

我想有一些方法來迫使它通過一些CSS或HTML或東西，但我什至不知道如果這些都是正確的條款。再次，我沒有網絡開發經驗。

謝謝！

Answer 1

我認爲你需要開始搞清楚用CSS來有效地修改默認的閃亮輸出。在這裏，它看起來像唯一需要修改的div是第一個container。由於沒有太多的CSS，它可以很容易地加入tags，

shinyApp(
    shinyUI(
     navbarPage("This is some awesome testing!!!", 
        tabPanel("Plot"), 
        tabPanel("Summary"), 
        navbarMenu("More", 
           tabPanel("Table"), 
           tabPanel("About") 
          ), 
        tags$head(tags$style(' 
         nav .container:first-child { 
          margin-left:10px; width: 100%; 
         }')) 
        )), 
    shinyServer(function(input, output) {}) 
)