powered by
Susceptible-Infected-Susceptible Model
SIS_ode(t, x, params)
A vector of derivatives
The timestep overwhich to calculate derivatives
A numeric vector of compartment populations.
A named vector of parameter values.
##Model Input S_0 <- 999 I_0 <- 1 beta <- 3 chi <- 2 parameters <- c(beta = beta, chi = chi) inits <- c(S = S_0, I = I_0) SIS_ode(1, inits, parameters)
Run the code above in your browser using DataLab