#' Function to plot condprobMin object
#'
#' This function plots minimum sample size vs average value of an input vector, which is
#' usually the y-value in a \code{condprob2::condprob} analysis.
#' The mean values are plotted vs sample size and the mean, upper limit and lower limit of
#' the bootstrapped original values are shown
#'
#' @param cpMin a condprobMin object
#' @param alpha the alpha level for determining confidence intervals. Default
#' is 0.05.
#' @export
plot.condprobMin <- function(cpMin, alpha = 0.05) {
with(cpMin[[1]], plot(avgMean, n))
abline(v = mean(cpMin[[2]]), col = "green")
abline(v = quantile(cpMin[[2]], 1 - alpha/2), col = "red")
abline(v = quantile(cpMin[[2]], alpha/2), col = "red")
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.