View source: R/infectious_disease_dynamics.R
plot_infectiousdisease_time | R Documentation |
Plot phase portrait for infectious disease model model
plot_infectiousdisease_time(sim_df, model_type)
sim_df |
simulated data frame generated from run_infectiousdisease_model() |
model_type |
which type of model to run? (should be one of |
run_infectiousdisease_model()
to simulate the dynamics of the
model, and plot_infectiousdisease_portrait()
to plot pairwise portrait
diagrams
# Run SIR model
params_vec <- c(m = .1, beta = .01, v = .2, gamma = 0)
init_vec <- c(S = 100, I = 1, R = 0)
time_vec <- seq(0, 100, 0.1)
sir_out <- run_infectiousdisease_model(time = time_vec, init = init_vec,
params = params_vec, model_type = "SIR")
plot_infectiousdisease_time(sir_out, model_type = "SIR")
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.