regressoR (version 1.2.1)

tb_predic: tb_predic

Description

creates comparison table between prediction and real data (test data).

Usage

tb_predic(real, predic.var)

Arguments

real

a data.frame with the real values.

predic.var

a vector with the prediction value.

Examples

# NOT RUN {
if(interactive()) {
  library(shiny)
  library(DT)
  shinyApp( 
    ui = fluidPage(fluidRow(column(12, DTOutput('tbl')))),
   server = function(input, output) {
     real <- iris[,'Petal.Width',drop = F]
     pred <- sample(iris$Petal.Width, nrow(iris), replace =  T)
     output$tbl = DT::renderDT(tb_predic(real, pred))
   })
}

# }