我正在尝试创建一个包含两行的页面,其中每行的高度是窗口高度的一定百分比(例如40%和60%)。尽管可以通过使用列轻松控制元素的宽度,但似乎找不到类似的高度解决方案。
这是一个小示例应用程序:
library(shiny)
ui <- navbarPage('',
tabPanel("page 1",
fluidPage(
fluidRow(
style='height:400px',
column(7, "text"),
column(5, "other text")),
fluidRow('some more text'))
),
tabPanel("page 2"),
tabPanel("page 3")
)
server <- function(input, output){}
shinyApp(ui=ui, server=server)
在更改窗口的宽度时,这些列可以很好地进行调整。行高在这里设置为400像素,但我希望它是窗口高度的40%。到目前为止,我发现的所有解决方案都涉及设置固定高度。
答案 0 :(得分:2)
使用参数vh
(1 vh
是视口高度的1%)。因此,如果您更改窗口的高度,则fluidRow
的高度也会被调整。
您可以找到其他CSS
个单位here。
fluidRow(style='height:40vh')