R/summary.pscore.R

In nonrandom: Stratification and matching by the propensity score

Defines functions summary.pscore

Documented in summary.pscore

summary.pscore <- function(object,
                           ...){

  res <- list(sum=summary(object$model.pscore))

  class(res) <- "summary.pscore"
  
  res


}

Try the nonrandom package in your browser