flowrow布局不如预期

Question

我正在尝试使用以下布局构建一个简单的闪亮应用程序，2X2布局

Data1 Data2
 Stats1 stats2

tabBox(title = "Data Review",id= "ttabs", width = 20, height = "420px",
tabPanel("Data",
column(3, dataTableOutput("data1"))
, column(3, verbatimTextOutput("sum1")),
, column(3, offset = 1,dataTableOutput("data2"))
, column(3, offset = 1, verbatimTextOutput("sum2"))  
)

数据2和stats2按预期显示（一个在另一个之下），但data1和stat1并排显示。不确定如何更新代码以获得预期结果

Answer 1

如何使用fluidRow（）？

ui <- fluidPage(
tabBox(title="Data Review", id="ttabs", width=20, height=420,
    tabPanel("Data",
        fluidRow(
            column(6, dataTableOutput("data1")),
            column(6, dataTableOutput("data2")) ),
        fluidRow(
            column(6, verbatimTextOutput("sum1")),
            column(6, verbatimTextOutput("sum2"))  )
    )
)

）

我希望这段代码可以帮助你。