SEIRjump: Simulates one jump from a simple stochastic SEIR epidemic...

In jessseliu/epidmod: epidmod

Description

SEIRjump returns states of next jump given the states right now.

Usage

SEIRjump(x, pars)

Arguments

x	A numeric vector: (time, S, E, I, R, N) at the previous jump.
pars	A numeric vector: (a.rate, e.rate, i.rate, r.rate, pE, pSR, pIm).

Value

A numeric vector: (time, S, E, I, R, N) immediately after the next jump.

Examples

A <- c(0,1000,0,0,0,1000)
B <- c(5,2,4,1,0.9,0.1)
SEIRjump(A,B)

jessseliu/epidmod documentation built on Sept. 15, 2020, 8:53 p.m.