R 为什么按钮保持在同一行，而文本输入不保持在同一行？

我希望按钮和文本输入位于同一行。按钮保持在同一行，但文本输入位于新行。我不明白为什么

ui  =   fluidPage(
    textInput("ti1", "TI1"),
    actionButton("Button1", "B1"),
    actionButton("Button2", "B2"),
    textInput("ti2", "TI2")
)

server <- function(input, output) {}

shinyApp(ui= ui, server=server)

ui=fluidPage(
文本输入（“ti1”、“ti1”），
操作按钮（“按钮1”、“B1”），
操作按钮（“按钮2”、“B2”），
文本输入（“ti2”、“ti2”）
)
服务器如下所示，
textInput（）
将其输出包装在HTML
div
元素中，而
actionButton
不包装。
div
元素的默认行为是直观地隔离它们的内容，实际上，在元素前后添加一个换行符，这就是您看到的内容

textInput("ti1", "TI1")
## <div class="form-group shiny-input-container">
##   <label for="ti1">TI1</label>
##   <input id="ti1" type="text" class="form-control" value=""/>
## </div>

actionButton("Button1", "B1")
##  <button id="Button1" type="button" class="btn btn-default action-button">B1</button>

我想可能对你有帮助。可爱的！！
ui <- fluidPage(
    fluidRow(
        column(width = 4,
               textInput("ti2", "TI2")),
        column(width = 4,
               textInput("ti1", "TI1"))
    ),
    fluidRow(actionButton("Button1", "B1")),
    fluidRow(actionButton("Button2", "B2"))
)

server <- function(input, output) {}

shinyApp(ui= ui, server=server)