% Generated by roxygen2: do not edit by hand
% Please edit documentation in R/api-estimation.R
\name{make_anchor_table}
\alias{make_anchor_table}
\title{Build an anchor table from fitted estimates}
\usage{
make_anchor_table(fit, facets = NULL, include_person = FALSE, digits = 6)
}
\arguments{
\item{fit}{Output from \code{\link[=fit_mfrm]{fit_mfrm()}}.}

\item{facets}{Optional subset of facets to include.}

\item{include_person}{Include person estimates as anchors.}

\item{digits}{Rounding digits for anchor values.}
}
\value{
A data.frame with \code{Facet}, \code{Level}, and \code{Anchor}.
}
\description{
Build an anchor table from fitted estimates
}
\details{
This function exports estimated facet parameters as an anchor table
for use in subsequent calibrations.  This is the standard approach
for \strong{linking} across administrations: a reference
run establishes the measurement scale, and anchored re-analyses
place new data on that same scale.

Anchor values should be exported from a well-fitting reference run
with adequate sample size.  If the reference model has convergence
issues or large misfit, the exported anchors may propagate
instability.  Re-run \code{\link[=review_mfrm_anchors]{review_mfrm_anchors()}} on the receiving data
to verify compatibility before estimation.

The \code{digits} parameter controls rounding precision.  Use at least 4
digits for research applications; excessive rounding (e.g., 1 digit)
can introduce avoidable calibration error.
}
\section{Interpreting output}{

\itemize{
\item \code{Facet}: facet name to be anchored in later runs.
\item \code{Level}: specific element/level name inside that facet.
\item \code{Anchor}: fixed logit value (rounded by \code{digits}).
}
}

\section{Typical workflow}{

\enumerate{
\item Fit a reference run with \code{\link[=fit_mfrm]{fit_mfrm()}}.
\item Export anchors with \code{make_anchor_table(fit)}.
\item Pass selected rows back into \code{fit_mfrm(..., anchors = ...)}.
}
}

\examples{
toy <- load_mfrmr_data("example_core")
fit <- fit_mfrm(toy, "Person", c("Rater", "Criterion"), "Score", method = "JML", maxit = 30)
anchors_tbl <- make_anchor_table(fit)
head(anchors_tbl)
summary(anchors_tbl$Anchor)
}
\seealso{
\code{\link[=fit_mfrm]{fit_mfrm()}}, \code{\link[=review_mfrm_anchors]{review_mfrm_anchors()}}
}
