# R: Gradient-function for the forced SEIR model

seirmod2 {epimdr} | R Documentation

## Gradient-function for the forced SEIR model

### Description

Gradient-function for the forced SEIR model

### Usage

    seirmod2(t, y, parms)

### Arguments

`t` | Implicit argument for time
`y` | A vector with values for the states
`parms` | A vector with parameter values for the SIR system

### Value

A list of gradients

### Examples

    require(deSolve)
    times  = seq(0, 10, by=1/120)
    paras  = c(mu = 1/50, N = 1, beta0 = 1000, beta1 = 0.2, sigma = 365/8, gamma = 365/5)
    start = c(S=0.06, E=0, I=0.001, R = 0.939)
    out=ode(y=start, times=times, func=seirmod2, parms=paras)

[Package epimdr version 0.6-4 Index]