Question

我遇到了一个奇怪的情况，让我困惑和搜索了一段时间，但似乎与我的数据表包没有相同的问题。

我只是在我的闪亮应用程序中使用了基本的默认数据表，参见示例：

Server.R

 library(shiny)
 library(DT)
 shinyServer(function(input, output) {

 output$expense_table_check<-renderDataTable({
   iris
 })
})

ui.R

library(shiny)
shinyUI(fluidPage(
mainPanel(
      navlistPanel(
       tabPanel("DT",h1("DT"),
       dataTableOutput("expense_table_check"))
   )
  )
 ) 
)

有时上述工作正常，但有时却没有。我尝试用{替换dataTableOutput("expense_table_check") dataTableOutput('expense_table_check')然后它有时会起作用，但有时候不行。

我还尝试用expense_table_check替换输出名称expense_table_check2。但仍然无法解决问题。任何建议或评论表示赞赏。

Answer 1

我在修改代码之后终于解决了问题，现在它一直运行良好;只需在数据表前添加DT::：

<强> Server.R

 library(shiny)
 library(DT)
 shinyServer(function(input, output) {

 output$expense_table_check <- DT::renderDataTable({
   iris
 })
})

<强> ui.R

library(shiny)
shinyUI(fluidPage(
mainPanel(
      navlistPanel(
       tabPanel("DT",h1("DT"),
       DT::dataTableOutput("expense_table_check"))
   )
  )
 ) 
)

r闪亮的数据表有时不会显示

1 个答案: