ModelSEIRCONN {epiworldR} | R Documentation |
Susceptible Exposed Infected Removed model (SEIR connected)
Description
The SEIR connected model implements a model where all agents are connected. This is equivalent to a compartmental model (wiki).
Usage
ModelSEIRCONN(
name,
n,
prevalence,
contact_rate,
transmission_rate,
incubation_days,
recovery_rate
)
## S3 method for class 'epiworld_seirconn'
plot(x, main = get_name(x), ...)
Arguments
name |
String. Name of the virus. |
n |
Number of individuals in the population. |
prevalence |
Initial proportion of individuals with the virus. |
contact_rate |
Numeric scalar. Average number of contacts per step. |
transmission_rate |
Numeric scalar between 0 and 1. Probability of transmission. |
incubation_days |
Numeric scalar greater than 0. Average number of incubation days. |
recovery_rate |
Numeric scalar between 0 and 1. Probability of recovery_rate. |
x |
Object of class SEIRCONN. |
main |
Title of the plot. |
... |
Currently ignore. |
Value
The
ModelSEIRCONN
function returns a model of class epiworld_model.
The plot
function returns a plot of the SEIRCONN model of class
epiworld_model.
See Also
epiworld-methods
Other Models:
ModelDiffNet()
,
ModelSEIR()
,
ModelSEIRD()
,
ModelSEIRDCONN()
,
ModelSIR()
,
ModelSIRCONN()
,
ModelSIRD()
,
ModelSIRDCONN()
,
ModelSIRLogit()
,
ModelSIS()
,
ModelSISD()
,
ModelSURV()
,
epiworld-data
Examples
# An example with COVID-19
model_seirconn <- ModelSEIRCONN(
name = "COVID-19",
prevalence = 0.01,
n = 10000,
contact_rate = 2,
incubation_days = 7,
transmission_rate = 0.5,
recovery_rate = 0.3
)
# Running and printing
run(model_seirconn, ndays = 100, seed = 1912)
model_seirconn
plot(model_seirconn)
# Adding the flu
flu <- virus("Flu", .9, 1/7)
add_virus(model_seirconn, flu, .001)
#' # Running and printing
run(model_seirconn, ndays = 100, seed = 1912)
model_seirconn
plot(model_seirconn)