% Generated by roxygen2: do not edit by hand
% Please edit documentation in R/guttman.R
\name{guttman_table}
\alias{guttman_table}
\title{Guttman-ordered response matrix and reproducibility}
\usage{
guttman_table(fit)
}
\arguments{
\item{fit}{A fitted object from \code{\link{rasch}}.}
}
\value{
A list with the ordered score matrix \code{matrix} (persons by
  items, row and column names carrying the ID and item labels), the person
  and item orderings, and the coefficient of reproducibility \code{CR}.
}
\description{
Orders persons by location (descending) and items by location (ascending),
the Guttman scalogram arrangement, and computes the coefficient of
reproducibility against the deterministic Guttman pattern implied by each
person's total score.
}
\examples{
set.seed(1)
d <- seq(-2, 2, length.out = 6)
X <- matrix(rbinom(200 * 6, 1, plogis(outer(rnorm(200), d, "-"))), 200, 6)
colnames(X) <- paste0("I", 1:6)
guttman_table(rasch(X))$CR
}
