% Generated by roxygen2: do not edit by hand
% Please edit documentation in R/twoPhaseSPMLglm_.R
\name{print.twoPhaseSPML}
\alias{print.twoPhaseSPML}
\title{Print method for \code{twoPhaseSPML} objects}
\usage{
\method{print}{twoPhaseSPML}(x, digits = max(3L, getOption("digits") - 3L), ...)
}
\arguments{
\item{x}{an object of class \code{"twoPhaseSPML"}, as returned by
\code{\link{twoPhaseSPML}}.}

\item{digits}{integer; minimum number of significant digits to print.
Passed to \code{\link{printCoefmat}}. Defaults to
\code{max(3L, getOption("digits") - 3L)}.}

\item{\dots}{further arguments passed to or from other methods (currently
unused).}
}
\value{
\code{x} is returned invisibly.
}
\description{
Prints a concise, \code{glm}-style summary of a fitted
\code{\link{twoPhaseSPML}} model.
}
\details{
Under the \emph{null} model (\code{miscov} absent from \code{formula}),
score statistics (\code{Sobs} and \code{Sexp}) are displayed. Under the
\emph{alternative} model, Wald statistics (\code{Wobs} and \code{Wexp})
together with standard errors and \eqn{p}-values for the missing-by-design
covariate(s) are displayed.  The coefficient table always shows the
estimated regression coefficients; standard errors and \eqn{p}-values are
shown only when \code{var_theta} is available (alternative model).
}
\examples{
data.table::setDTthreads(1)
data <- DataGeneration_TPD(N=200)
set.seed(1)
R <- rep(0, nrow(data))
R[sample(nrow(data), 175)] <- 1
data[R == 0, c("G1")] <- NA

res_Ho <- twoPhaseSPML(
  formula = Y ~ Z,
  miscov  = ~ G1,
  auxvar  = ~ Z,
  data   = data
)
print(res_Ho)

}
\seealso{
\code{\link{twoPhaseSPML}}
}
