R闪亮显示wellPanel对象水平

Question

我有wellPanel：

   wellPanel(
              h5("Accuracy table:"),
              tableOutput(accuracy_tablename))
          )

我想在wellPanel中水平显示对象。我该如何管理？

提前谢谢！

Answer 1

您可以使用类＆＃34; row＆＃34;定义div。 （或＆＃34; row-fluid＆＃34;）和insert sub-divs（＆＃34; spanX＆＃34;类指定每个div之间的空格）将水平显示。

shiny::runApp(list(
  ui = basicPage(
    wellPanel(
      tags$div(class = "row",
        tags$div(class = "span4",
          h5("Accuracy table:")
        ),
        tags$div(class = "span4",
          tableOutput("table")
        )
      )
    )
  ),
  server = function(input, output, session) {

    output$table <- renderTable({
      iris[1,]
    })

  }
))

Answer 2

如果您的意思是并排显示多个面板而不是另一个面板，我发现以下内容非常有用：

    div(style="display:inline-block",  
       h5("Accuracy table:"),
       tableOutput(accuracy_tablename))
    )

  div(style="display:inline-block",  
       h5("Accuracy table 2:"),
       tableOutput(accuracy_tablename2))
    )

等