graph_crossing: Calculate Graph Crossing Time

In gavincotterill/modulr: Simulate Individual Movement Behaviors Underlying Modular Fission-Fusion Networks

Calculate Graph Crossing Time

Description

Recursive function to calculate graph crossing time and do individual-based SEIR modeling

Usage

graph_crossing(schedule, exposure_time, infectious_time, index_case)

Arguments

schedule	a schedule object from simulate_schedule()
exposure_time	for graph-crossing times, 0, otherwise the number of days prior to becoming infectious
infectious_time	for graph-crossing times, a large value of the simulation duration, otherwise the number of days infectious
index_case	an animal id from the schedule_object to be the first infected

Examples

obj <- simulate_schedule(n_animals = 15,
                         n_groups = 3,
                         time_to_leave = 5,
                         time_to_return = 2,
                         travel_time = c(0.001, 0.2),
                         sampling_duration = 20,
                         simulator = "independent")
out <- graph_crossing(schedule = obj,
                      exposure_time = 2,
                      infectious_time = 5,
                      index_case = names(obj)[[1]])

gavincotterill/modulr documentation built on Nov. 30, 2022, 11:15 p.m.