pkg/R/print.xtableMatharray.R

   1 print.xtableMatharray <- function(x,
   2            print.results = TRUE,
   3            format.args = getOption("xtable.format.args", NULL),
   4            scalebox = getOption("xtable.scalebox", NULL),
   5            comment = FALSE,
   6            timestamp = NULL,
   7            ...)
   8 {
   9   class(x) <- c("xtableMatharray","data.frame")
  10   print.xtable(x, floating = FALSE,
  11                tabular.environment = 'array',
  12                include.rownames = FALSE, include.colnames = FALSE,
  13                hline.after = NULL,
  14                print.results = print.results,
  15                format.args = format.args,
  16                scalebox = scalebox,
  17                comment = comment,
  18                timestamp = timestamp,
  19                ...)
  20 }