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

时间:2018-11-30 09:43:57

标签: css r shiny

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

1 个答案:

答案 0 :(得分:2)

使用参数vh(1 vh是视口高度的1%)。因此,如果您更改窗口的高度,则fluidRow的高度也会被调整。

您可以找到其他CSS个单位here

fluidRow(style='height:40vh')