Content - 594a9e1196183500c4556122dc30e09b8953ba37 - 4dc428b/R/print.map_estimate.R

swh:1:snp:2c68a6c5a8af2f06ac2c0225927f25b54fd1f9d0

Tip revision: d73e4a2afcfbd6402c11716877e8f7466f309ef4 authored by Dominique Makowski on 22 October 2020, 13:40:02 UTC
version 0.7.5

Tip revision: d73e4a2

print.map_estimate.R

#' @export
print.map_estimate <- function(x, ...) {
  orig_x <- x
  if (inherits(x, "data.frame")) {
    print.data.frame(x)
  } else {
    cat(sprintf("MAP = %.2f", x))
  }
  invisible(orig_x)
}