vaccinationimpact (version 0.1.0)

compute_events_averted_by_vaccination: Compute events averted by vaccination

Description

Compute events averted by vaccination

Usage

compute_events_averted_by_vaccination(
  number_of_events,
  cumulative_coverage,
  vaccine_effectiveness
)

Value

estimated number of events averted

Arguments

number_of_events

number of events

cumulative_coverage

cumulative vaccination coverage

vaccine_effectiveness

vaccine effectiveness

Details

The number of events averted by vaccination is calculated as described by Machado et al. (2019) doi:10.2807/1560-7917.ES.2019.24.45.1900268.

Examples

data(coverage_and_incidence_mock_data)
data(ve_mock_data)
coverage <- coverage_and_incidence_mock_data$coverage_data
incidence <- coverage_and_incidence_mock_data$incidence_data
vaccine_effectiveness <- ve_mock_data$ve
nae <- compute_events_averted_by_vaccination(
  number_of_events = incidence$events,
  cumulative_coverage = coverage$cumulative_coverage,
  vaccine_effectiveness = vaccine_effectiveness
)
plot(nae, type = "l", xlab = "Time", ylab = "Events averted")