我有wellPanel:
wellPanel(
h5("Accuracy table:"),
tableOutput(accuracy_tablename))
)
我想在wellPanel中水平显示对象。我该如何管理?
提前谢谢!
答案 0 :(得分:3)
您可以使用类" row"定义div。 (或" row-fluid")和insert sub-divs(" spanX"类指定每个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,]
})
}
))
答案 1 :(得分:2)
如果您的意思是并排显示多个面板而不是另一个面板,我发现以下内容非常有用:
div(style="display:inline-block",
h5("Accuracy table:"),
tableOutput(accuracy_tablename))
)
div(style="display:inline-block",
h5("Accuracy table 2:"),
tableOutput(accuracy_tablename2))
)
等