#' Create an example plot using the [logisticat::gglogistic()] function.
#'
#' @export
example.plot <- function (){
logisticat::metamorphosis() %>%
logisticat::gglogistic(
predictor = "days",
success.counts = "metamorphosed",
failure.counts = "did.not.metamorphose",
treatment = "ration",
replicate = "beaker",
probability.of.interest = 0.5,
xlabel = "Age (days)",
ylabel = "Metamorphic Competence",
treatment.label = "Algal Ration",
boxplot.var = "replicate")
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.