ShinyDashboard - CSS로 확대

Question

웹 브라우저의 80 % 확대시 레이아웃이 더보기 좋게 빛나는 대시 보드에서 확대/축소를 구현하려고합니다.

그래도 기사를 찾았지만 Shinydashboard에는 작동하지 않습니다. CSS을 구현하면 죽은 공백이 많이 생깁니다.

제에 SO : Zoom out shiny app at default in browser

간단한 코드 예제 :

library(shiny) 
library(shinydashboard) 

header <- dashboardHeader() 
sidebar <- dashboardSidebar() 
body <- dashboardBody(
    tags$style(" 
       body { 
      -moz-transform: scale(0.8, 0.8); /* Moz-browsers */ 
      zoom: 0.8; /* Other non-webkit browsers */ 
      zoom: 80%; /* Webkit browsers */ 
      } 
      "), 
    "test") 

ui <- dashboardPage(header, sidebar, body) 

server <- function(input, output, session) {} 

shinyApp(ui, server) 

사진 (사용 크롬) 문제를 보여주는 : 나는 당신이 당신의 UI 코드를 수정하면 작동 생각

Answer 1

약간. 이 방법으로 할 때 그것은 나를 위해 작동합니다.

library(shiny) 
library(shinydashboard) 

ui <- dashboardPage(
dashboardHeader(), 
dashboardSidebar(), 
dashboardBody(
    tags$style(" 
       body { 
      -moz-transform: scale(0.8, 0.8); /* Moz-browsers */ 
      zoom: 0.8; /* Other non-webkit browsers */ 
      zoom: 80%; /* Webkit browsers */ 
      } 
      ") 
)) 

server <- function(input, output, session) {} 

shinyApp(ui, server)