R/print.dxwts.R

In mattcefalu/twang: Toolkit for Weighting and Analysis of Nonequivalent Groups

#' Default print statement for `dxwts` class
#' 
#' @param x A `dxwts` object
#' @param ... Additional arguments.
#'
#' @method print dxwts
#' @export
#' @md
print.dxwts <- function(x,...)
{
   print(x$summary.tab)
}