缩放窗口高度的闪光情节

Question

我想缩放到窗口高度的闪亮情节。这related SO question只使用绝对高度规格的像素，当height = 100%是更可取的。我在文档中注意到absolutePanel可以通过它的top, bottom, left, right参数实现这一点，但是随后您将失去侧面板，并且在任何情况下，绘图（缩放到宽度）似乎忽略可用高度。

我猜这与html怪癖有关，这意味着您需要使用javascript innerHeight变量获取高度。但我不清楚如何实施一个闪亮的解决方案，以得到ui.R利用这一点。感谢任何指针。

发展的一个基本应用模式：

ui.R

library(shiny) 
shinyServer(
    function(input, output) { 
    output$myplot <- renderPlot({ 
     hist(rnorm(1000)) 
    }) 
    } 
) 

server.R

library(shiny) 
pageWithSidebar(
    headerPanel("window height check"), 
    sidebarPanel(), 
    mainPanel(
    plotOutput("myplot") 
) 
) 

Answer 1

使用CSS3。在视口单元http://caniuse.com/#feat=viewport-units中声明你的身高。 你应该能够在plotOutput使用height参数但是shiny::validateCssUnit犯规承认他们宣布他们这样你就可以代替一个风格的头声明它们：

library(shiny) 
runApp(
    list(server= function(input, output) { 
    output$myplot <- renderPlot({ 
     hist(rnorm(1000)) 
    }) 
    } 
    , ui = pageWithSidebar(
    headerPanel("window height check"), 
    sidebarPanel(
     tags$head(tags$style("#myplot{height:100vh !important;}")) 
    ), 
    mainPanel(
     plotOutput("myplot") 
    ) 
) 
) 
) 

在闪亮的浏览器，但这个不会工作应在正常工作主浏览器。