R/print.powerByFactor_function.R

#' @export

print.powerByFactor <- function(x, ...) {
  results <- do.call(cbind, x$result)
  final <- data.frame(Samples = x$nSample, results)
  print(final)
  invisible(NULL)
}
hutchisonjtw/JNCCTools documentation built on May 17, 2019, 9:14 p.m.