Блестящая таблица данных не отображается с сервером RStudio и блестящим сервером

Question

У меня есть это простое приложение, и оно не будет отображать блестящую таблицу данных при запуске с сервера RStudio/Shiny Server, но отлично работает при запуске на рабочем столе RStudio с Блестящая:

library(shiny) 
library(DT) 

ui <- fluidPage(
    dataTableOutput('table1'), 
    plotOutput('plot1') 
) 

server <- function(input, output) { 
    output$table1 <- renderDataTable({ 
    datatable(mtcars) 
    }) 
    output$plot1 <- renderPlot({ 
    plot(mtcars$wt, mtcars$mpg) 
    }) 
} 

shinyApp(ui = ui, server = server) 

Когда я печатаю только datatable(mtcars) в консоли сервера RStudio, я получаю вывод таблицы данных прекрасно в окне просмотра. Просто, когда я запускаю это приложение как блестящее, у меня проблема. Любые мысли о том, что может вызвать это?

packageVersion('DT') 
[1] ‘0.1.56’ 
packageVersion('shiny') 
[1] ‘0.13.2’ 
version 
       _       
platform  x86_64-redhat-linux-gnu  
arch   x86_64      
os    linux-gnu     
system   x86_64, linux-gnu   
status          
major   3       
minor   3.0       
year   2016       
month   05       
day   03       
svn rev  70573      
language  R       
version.string R version 3.3.0 (2016-05-03) 
nickname  Supposedly Educational 

Answer 1

запятая здесь отсутствует:

dataTableOutput('table1'), 

Answer 2

Имейте в виду, что Shiny имеет свои own renderDataTable, dataTableOutput и DataTable функции. Вы могли бы

1. попытаться удалить библиотеку DT, поэтому нет путаницы, вызвана ли функция Shiny или DT.

2. попытайтесь добавить каждую функцию renderDataTable, dataTableOutput и dataTable с помощью DT, которая гарантирует, что вы всегда используете вариант DT.

Е.Г.,

DT::renderDataTable