R/proto.R

In benchmark: Benchmark Experiments Toolbox

Defines functions print.proto pprint summary.proto

#' @S3method print proto
print.proto <- function(x, ...) {
  x$pprint(...)
}



pprint <- function (x, ...) {
  print(as.list(x), ...)
}



#' @S3method summary proto
summary.proto <- function(object, ...) {
  object$psummary(...)
}

Try the benchmark package in your browser