tswv: Tomato Spotted Wilt Virus (TSWV) data

In EpiILM: Spatial and Network Based Individual Level Models for Epidemics

Description

Data extracted from Hughes et al. (1997). Data obtained from a field experiment as the spatial dynamics of tomato spotted wilt virus (tswv).

Usage

data(tswv)

Format

A data frame with following variables

x

X coordinate

y

Y coordinate

inftime

Infection times

removaltime

Times at which individuals are removed

References

Hughes, G., McRoberts,N., Madden, L.V., Nelson, S. C. (1997). Validating mathematical models of plant disease progress in space and time. IMA Journal of Mathematics Applied in Medicine and Biology, 14, 85-112.

Examples

data("tswv")

x <- tswv$x 
y <- tswv$y 
inftime <- tswv$inftime 
removaltime <- tswv$removaltime 
infperiod <- rep(3, length(x))  

# change to epilate object
 epidat.tswv <- as.epidata(type = "SIR", n = 520, x = x, y = y, 
                            inftime = inftime, infperiod = infperiod)

# plot
plot(epidat.tswv, plottype = "spatial", tmin = 2)

EpiILM documentation built on Jan. 13, 2021, 1:07 p.m.