Plots seroprevalence from the given serosurvey

Usage

plot_serosurvey(
  serosurvey,
  size_text = 11,
  bin_serosurvey = FALSE,
  bin_step = 5
)

Arguments

serosurvey

survey_year: Year in which the survey took place (only needed to plot time models)
age_min: Floor value of the average between age_min and age_max
age_max: The size of the sample
n_sample: Number of samples for each age group
n_seropositive: Number of positive samples for each age group

size_text

Size of text for plotting (base_size in ggplot2)

bin_serosurvey

If TRUE, serodata is binned by means of prepare_bin_serosurvey. Otherwise, age groups are kept as originally input.

bin_step

Integer specifying the age groups bin size to be used when bin_serosurvey is set to TRUE.

Value

ggplot object with seroprevalence plot

Examples

# Chikungunya example serosurvey
data(chik2015)
plot_serosurvey(chik2015)


# VEEV example serosurvey
data(veev2012)
plot_serosurvey(veev2012)


# Chagas disease example serosurvey
data(chagas2012)
plot_serosurvey(chagas2012, bin_serosurvey = TRUE)
#> Warning: (age_min - age_max) is not an integer multiple of step.
#>     The last age interval will be truncated to [76,79]