# \donttest{
library(dplyr)
library(ggplot2)
library(magrittr)
curve <-
serocalculator_example("example_curve_params.csv") |>
read.csv() |>
as_sr_params() |>
filter(antigen_iso %in% c("HlyE_IgA", "HlyE_IgG")) |>
graph_seroresponse_model_1()
curve
# }
Run the code above in your browser using DataLab