% Generated by roxygen2: do not edit by hand
% Please edit documentation in R/unsupervised-pca.R
\name{tidy_pca_screeplot}
\alias{tidy_pca_screeplot}
\title{Create PCA Scree Plot}
\usage{
tidy_pca_screeplot(pca_obj, type = "proportion", add_line = TRUE)
}
\arguments{
\item{pca_obj}{A tidy_pca object}

\item{type}{Character; "variance" or "proportion" (default)}

\item{add_line}{Logical; add horizontal line at
eigenvalue = 1? (for Kaiser criterion)}
}
\value{
A \code{\link[ggplot2]{ggplot}} object.
}
\description{
Visualize variance explained by each principal component
}
\examples{
\donttest{
pca <- tidy_pca(USArrests)
tidy_pca_screeplot(pca)
}

}
