Как создать таблицу непредвиденных ситуаций для блестящего приложения

Question

Как создать таблицу непредвиденных ситуаций в моем блестящем приложении r studio.

Answer 1

Вы можете преобразовать его в data.frame используя as.data.frame.matrix и затем сделать, как и любую другую таблицу:

library(shiny) 

shinyApp(
    ui=shinyUI(bootstrapPage(
     tableOutput('foo') 
    )), 
    server=shinyServer(function(input, output, session) { 
     output$foo <- renderTable({ 
      as.data.frame.matrix(table(c(1, 1, 1, 2, 3), c(2, 2, 3, 4, 3))) 
     }) 
    }) 
)