% Generated by roxygen2: do not edit by hand
% Please edit documentation in R/mmm.R
\name{summary.net_mmm}
\alias{summary.net_mmm}
\title{Summary Method for net_mmm}
\usage{
\method{summary}{net_mmm}(object, ...)
}
\arguments{
\item{object}{A \code{net_mmm} object.}

\item{...}{Unsupported. Supplying unused arguments raises an error.}
}
\value{
A per-component summary \code{data.frame}. The class and visibility
depend on whether the model was fitted with covariates:
\describe{
\item{No covariates}{A plain \code{data.frame} with one row per
component and columns \code{component}, \code{prior},
\code{n_assigned}, \code{mean_posterior}, \code{avepp}, returned
\emph{visibly} (so it auto-prints after the printed summary block).}
\item{With covariates}{A \code{tidy_covariates}/\code{data.frame}
(the tidied covariate table, with the per-component stats attached),
returned \emph{invisibly}.}
}
In both cases the printed summary (model fit, per-cluster transition
matrices, optional covariate profiles) is emitted as a side effect.
}
\description{
Summary Method for net_mmm
}
\examples{
seqs <- data.frame(V1 = sample(c("A","B","C"), 30, TRUE),
                   V2 = sample(c("A","B","C"), 30, TRUE))
mmm <- build_mmm(seqs, k = 2, n_starts = 1, max_iter = 10, seed = 1)
summary(mmm)
\donttest{
set.seed(1)
seqs <- data.frame(
  V1 = sample(c("A","B","C"), 30, TRUE),
  V2 = sample(c("A","B","C"), 30, TRUE),
  V3 = sample(c("A","B","C"), 30, TRUE)
)
mmm <- build_mmm(seqs, k = 2, n_starts = 5, seed = 1)
summary(mmm)
}

}
