R/print.momint.R

In MOM: Estimation and Testing of Hypothesis

#' @keywords internal
#' @export
print.momint=function(x,...,verbose=TRUE)
{
  if(verbose==TRUE)
  {
  cat(x$Method,"\n\n")
  cat("Population Distribution: ",x$Population.Distrbution,"\n")
  cat("Parameter: ",x$Parameter,"\n")
  cat("Sample Size: ",x$Sample.Size,"\n")
  cat("Confidence Coefficient: ",x$Confidence.Coefficient,"\n")
  cat("Sampling Interval: ",x$Sampling.Interval,"\n")
  }
}