【问题标题】:Shiny Dashboard boxes responsivity闪亮的仪表板框响应性
【发布时间】:2018-02-27 22:03:33
【问题描述】:

我有两个框,第一个是两个输入,第二个框包含表格。我将包 DT 用于表格。此设置适用于分辨率 1920x1080,但问题在于较小的分辨率,例如 1024x768

tabItem(tabName="Table",titlePanel("My Data"),


box(width=2,uiOutput("first_input"),textInput("numbers_input",label="choose your option",width ="200px")),

box(width=9,dataTableOutput("tabData"))

),

1024x768

【问题讨论】:

  • 到底是什么问题?你还没有真正突出它,你不想要滚动?你想要 100% 的宽度?有什么问题?
  • @Pork Chop 问题是在较小的分辨率下,盒子是连接的。我希望盒子相邻
  • 下面的例子应该没​​问题,注意在浏览器中打开应用程序。我不知道 rstudio 查看器对更改有何反应
  • 我知道,但我尝试在 Firefox 中查看,问题是一样的。
  • 您应该提供完整的示例,因为下面的代码也可以在 Firefox 上完美运行

标签: r shiny shinydashboard


【解决方案1】:

尝试添加scrollX = T

library(shiny)
library(shinydashboard)
library(DT)

ui <- dashboardPage(
  dashboardHeader(), 
  dashboardSidebar(),
  dashboardBody(
    tabItem(tabName="Table",titlePanel("My Data"),
            box(width=2,uiOutput("first_input"),textInput("numbers_input",label="choose your option",width ="200px")),
            box(width=9,dataTableOutput("tabData"))

    )
  )
)

server <- function(input, output, session) {
  output$tabData <- renderDataTable({cbind(mtcars,mtcars)},options = list(scrollX = T))
}

shinyApp(ui, server)

【讨论】:

    猜你喜欢
    • 2021-09-05
    • 1970-01-01
    • 2018-05-30
    • 2015-04-22
    • 1970-01-01
    • 2019-02-12
    • 1970-01-01
    • 1970-01-01
    • 2021-01-17
    相关资源
    最近更新 更多