displayTable {HVT}

Table for displaying summary

Description

This is the main function for displaying summary from model training and scoring

Usage

displayTable(
  data,
  columnName,
  value,
  tableType = "summary",
  scroll = TRUE,
  limit = 100
)

Arguments

data

List. A listed object from trainHVT or scoreHVT

columnName

Character. Name of the column that needs highlighting.

value

Numeric. The value above will be highlighted in red or green.

tableType

Character. Type of table to generate ('summary', 'compression')

scroll

Logical. A value to have a scroll or not in the table.

limit

Numeric. A value to indicate how many rows to display. Applicable for summary tableType.

Value

A consolidated table of results

Author(s)

Vishwavani <[e-mail]>

See Also

trainHVT

Examples

dataset <- data.frame(date = as.numeric(time(EuStockMarkets)),
                      DAX = EuStockMarkets[, "DAX"],
                      SMI = EuStockMarkets[, "SMI"],
                      CAC = EuStockMarkets[, "CAC"],
                      FTSE = EuStockMarkets[, "FTSE"])
hvt.results<- trainHVT(dataset,n_cells = 60, depth = 1, quant.err = 0.1,
                       distance_metric = "L1_Norm", error_metric = "max",
                       normalize = TRUE,quant_method = "kmeans")
displayTable(data = hvt.results[[3]]$compression_summary,
columnName = 'percentOfCellsBelowQuantizationErrorThreshold', 
value = 0.8, tableType = "compression")

displayTable(data =hvt.results[[3]][['summary']], columnName= 'Quant.Error',
 value = 0.1, tableType = "summary")