How to Show R Crosstable in Shiny
<p>my server.R</p>

<pre><code>shinyServer(function(input, output) {

output$table0 &lt;- renderPrint({
  confusionMatrix(sms_results$predict_type,
                  sms_results$actual_type, positive = "spam")
})

output$table &lt;- renderDataTable({
  table(sms_results$actual_type, sms_results$predict_type)
})
output$table1 &lt;- renderDataTable({
  CrossTable(sms_test_pred, sms_test_labels,
             prop.chisq = FALSE, prop.t = FALSE, prop.r = FALSE,
             dnn = c('predicted', 'actual'))
})
</code></pre>

<p>ui.R</p>

<pre><code>shinyUI(fluidPage(

  # Application title
  titlePanel("Evaluating Model Performance"),


  mainPanel(
    plotOutput("plot"),
    column(12,
           dataTableOutput('table')
    )
  ),
           dataTableOutput('table0')

 )
    )
</code></pre>

<p>So, how to external view Crosstable and confusion matrix in shiny?</p>