Question

我们如何确定每一行的宽度。下面是示例代码和示例数据文件（sample data）来重现错误：

library(shiny)
library(readxl)

runApp(
  list(
    ui = fluidPage(
      titlePanel("Use readxl"),
      sidebarLayout(
        sidebarPanel(
          fileInput('file1', 'Choose xlsx file',
                    accept = c(".xlsx")
          )
        ),
        mainPanel(
          tableOutput('contents'))
      )
    ),
    server = function(input, output){
      output$contents <- renderTable({

        req(input$file1)

        inFile <- input$file1

        readxl::read_excel(inFile$datapath, 1)
      })
    }
  )
)

我们观察到，第一行和第二行的宽度不同。是否有可能使用“ DT”固定行宽？ Row width of read xlsm

Answer 1

如果您在R控制台中键入renderTable()（或在shiny website上查找），则会看到一个帮助页面。除了可以方便使用的其他功能外，它还有一个间距变量，您可以在调用output$contents <- renderTable({ iris }, spacing = 'l')时使用它。尝试将其设置为大，例如

kubectl exec -it example-0 bash

让我知道它是否对您不起作用

如何固定闪亮的已读取xlsm文件的行宽？

1 个答案: