% Generated by roxygen2: do not edit by hand
% Please edit documentation in R/plots.R
\name{dfdr_plot_elasticity}
\alias{dfdr_plot_elasticity}
\title{Plot threshold elasticity (Jaccard) versus \code{alpha}}
\usage{
dfdr_plot_elasticity(
  el_tbl,
  xlab = "alpha (log10)",
  title = "Threshold elasticity (Jaccard) vs alpha"
)
}
\arguments{
\item{el_tbl}{An elasticity table (e.g. from \code{\link{dfdr_elasticity}})
containing columns \code{alpha}, \code{jaccard}, and \code{list}.}

\item{xlab}{Character. X-axis label.}

\item{title}{Character. Plot title.}
}
\value{
A \link[ggplot2:ggplot]{ggplot} object.
}
\description{
Plots Jaccard overlap values (as returned by \code{\link{dfdr_elasticity}})
against \code{alpha}. Lower overlap indicates greater sensitivity of the
accepted set to small changes of the threshold.
}
\examples{
library(tibble)

el_tbl <- tibble(
  list = rep(c("A", "B"), each = 4),
  alpha = rep(c(1e-3, 2e-3, 5e-3, 1e-2), times = 2),
  jaccard = c(0.95, 0.93, 0.90, 0.88, 0.92, 0.90, 0.86, 0.82)
)
dfdr_plot_elasticity(el_tbl)

}
