你可以使用fluidRow()和column()。您首先使用 afluidRow()并columns()在该函数中添加,...
可重现的例子:
library(shiny)
ui <- fluidPage(
fluidRow(
column(width = 3,
selectInput("min", "Min Price", 1:4)
),
column(width = 3,
selectInput("max", "Max Price", 1:4)
)
),
fluidRow(
column(width = 3,
selectInput("min2", "Property type", letters[1:4])
),
column(width = 3,
selectInput("max2", "Bedrooms", 1:4)
)
)
)
shinyApp(ui, server = function(input, output){ })
Run Code Online (Sandbox Code Playgroud)
| 归档时间: |
|
| 查看次数: |
5251 次 |
| 最近记录: |