% Generated by roxygen2: do not edit by hand
% Please edit documentation in R/api-plotting.R
\name{plot_data_components}
\alias{plot_data_components}
\title{List reusable components in mfrmr plot data}
\usage{
plot_data_components(x, type = NULL, ...)
}
\arguments{
\item{x}{An \code{mfrm_plot_data} object, or a fitted/report/review object with a
\code{plot(..., draw = FALSE)} method.}

\item{type}{Optional plot type passed to \code{plot()} when \code{x} is not already an
\code{mfrm_plot_data} object.}

\item{...}{Additional arguments passed to \code{plot(..., draw = FALSE)} when
\code{x} is not already an \code{mfrm_plot_data} object.}
}
\value{
A data frame with one row per reusable plot-data component.
}
\description{
\code{plot_data_components()} is a companion to \code{\link[=plot_data]{plot_data()}}. It returns a
compact table that tells users which plot-data components are available,
what shape they have, and which ones are most useful for custom graphics,
dashboards, or report assembly.
}
\examples{
\donttest{
toy <- load_mfrmr_data("example_core")
fit <- fit_mfrm(toy, "Person", c("Rater", "Criterion"), "Score", maxit = 30)
plot_data_components(fit, type = "pathway")

curves <- category_curves_report(fit, theta_points = 51)
plot_data_components(curves, type = "category_probability")

toy$ResponseTime <- 10 + seq_len(nrow(toy)) \%\% 6 + as.numeric(toy$Score)
rt <- response_time_review(
  toy,
  person = "Person",
  facets = c("Rater", "Criterion"),
  score = "Score",
  time = "ResponseTime"
)
plot_data_components(plot_response_time_review(rt, draw = FALSE))
}
}
