% Generated by roxygen2: do not edit by hand
% Please edit documentation in R/disparity.R
\name{plot.tna_disparity}
\alias{plot.tna_disparity}
\title{Plot Disparity Filter Result}
\usage{
\method{plot}{tna_disparity}(x, type = c("backbone", "comparison"), ...)
}
\arguments{
\item{x}{A tna_disparity object.}

\item{type}{Plot type: "backbone" (default) or "comparison".}

\item{...}{Additional arguments passed to splot.}
}
\value{
Invisibly returns \code{NULL}. Called for the side effect of producing a plot.
}
\description{
Plot Disparity Filter Result
}
\examples{
\dontrun{
mat <- matrix(c(
  0.0, 0.5, 0.1, 0.0,
  0.3, 0.0, 0.4, 0.1,
  0.1, 0.2, 0.0, 0.5,
  0.0, 0.1, 0.3, 0.0
), nrow = 4, byrow = TRUE)
rownames(mat) <- colnames(mat) <- c("A", "B", "C", "D")
disp <- disparity_filter(cograph(mat), level = 0.05)
plot(disp)
plot(disp, type = "comparison")
}

}
