[.pdata {ecode}

Extract Parts of an Population Dynamics Data

Description

Operators acting on population dynamics data.

Usage

## S3 method for class 'pdata'
x[i]

Arguments

x

Object of class "pdata".

i

indice specifying elements to extract.

Value

pdata object

Examples

eq1 <- function(x, y, r1 = 4, a11 = 1, a12 = 2) (r1 - a11 * x - a12 * y) * x
eq2 <- function(x, y, r2 = 1, a21 = 2, a22 = 1) (r2 - a21 * x - a22 * y) * y
x <- eode(dxdt = eq1, dydt = eq2)
pdat <- pdata(x,
  init = data.frame(x = c(10, 20), y = c(5, 15)),
  t = c(3, 3),
  lambda = data.frame(z = c(15, 30)),
  formula = "z = x + y"
)
pdat[1]