C_code | R Documentation |
SimInf_model
objectExtract the C code from a SimInf_model
object
C_code(model)
model |
The |
Character vector with C code for the model.
## Use the model parser to create a 'SimInf_model' object that
## expresses an SIR model, where 'b' is the transmission rate and
## 'g' is the recovery rate.
model <- mparse(transitions = c("S -> b*S*I/(S+I+R) -> I", "I -> g*I -> R"),
compartments = c("S", "I", "R"),
gdata = c(b = 0.16, g = 0.077),
u0 = data.frame(S = 99, I = 1, R = 0),
tspan = 1:10)
## View the C code.
C_code(model)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.