% Generated by roxygen2: do not edit by hand
% Please edit documentation in R/simplicial.R
\name{plot.persistent_homology}
\alias{plot.persistent_homology}
\title{Plot Persistent Homology}
\usage{
\method{plot}{persistent_homology}(x, combined = TRUE, ...)
}
\arguments{
\item{x}{A \code{persistent_homology} object.}

\item{combined}{When \code{TRUE} (default), the two panels are stitched
side-by-side via \code{gridExtra::arrangeGrob}. When \code{FALSE}, returns a
named list (\code{betti_curve}, \code{persistence}) of ggplots.}

\item{...}{Ignored.}
}
\value{
A grid grob (invisibly) when \code{combined = TRUE}; a named list
of two ggplots when \code{combined = FALSE}.
}
\description{
Two panels: Betti curve (threshold vs Betti number) and persistence
diagram (birth vs death). Persistence pairs come from full boundary-
matrix reduction; essential classes are shown at the filtration boundary
(\code{death = 0} in clique mode, \code{death = max_scale} in VR mode).
}
\examples{
\donttest{
seqs <- data.frame(
  V1 = c("A","B","C","A","B"),
  V2 = c("B","C","A","B","C"),
  V3 = c("C","A","B","C","A")
)
net <- build_network(seqs, method = "relative")
ph  <- persistent_homology(net)
if (requireNamespace("gridExtra", quietly = TRUE)) plot(ph)
}

}
