如何在 Shiny 中设置动态流体行高度答案

【问题标题】：How to set a dynamic fluidRow height in Shiny如何在 Shiny 中设置动态流体行高度
【发布时间】：2018-11-30 09:43:56
【问题描述】：

我正在尝试创建一个包含两行的页面，其中每行的高度是窗口高度的某个百分比（例如 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%。到目前为止，我发现的所有解决方案都涉及设置固定高度。

【问题讨论】：

标签： css r shiny

【解决方案1】：

使用参数vh（1 vh 是视口高度的 1%）。因此，如果您更改窗口的高度，fluidRow 的高度也会随之调整。

你可以找到其他CSS单位here。

fluidRow(style='height:40vh')

【讨论】：