renderDT показывает только заголовки и ни одной строки - PullRequest
0 голосов
/ 20 января 2019

Это очень странная проблема, и я ломал голову последние несколько часов. Получите воспроизводимый пример ниже. Кажется, это ошибка в блестящем пакете R DT.

Итак, давайте посмотрим, что происходит.

library(shiny)
library(DT)

df1 <- data.frame(x=1:10,y=1:2)
ui <- fluidPage(
  fluidRow(
    DTOutput("list1")
    #DTOutput("list2")
  )
)

server <- function(input,output) {
  output$list1 <- renderDT(df1)
  output$list2 <- renderDT(mtcars)
}

shinyApp(ui, server)

Приведенный выше код не отображает простой data.frame из 10 строк. Вместо этого просто показывает пустую таблицу. Снимок экрана прилагается.

Rstudio viewer screenshot with blank output

Но очень удивительно, если я просто заменю data.frame на mtcars, он отображается правильно. Вам просто нужно раскомментировать следующую DTOutput строку. И прокомментируйте первый DTOutput перед запуском shinyapp.

 #DTOutput("list1")
 DTOutput("list2")

Снимок экрана после того, как мы закомментировали предыдущий DTOutput и раскомментировали следующий mtcars.

UPDATE

Дальнейшее сужение проблемы Я наблюдаю те же симптомы при выводе данных с использованием пакета DT R без использования shiny.

Попытка

DT::datatable(data = data.frame(name=letters,age=1:13))

Я просто вижу name, age в средстве просмотра Rstudio, а также в браузере Chrome и без содержимого таблицы.

enter image description here

...