predatorprey: predatorprey

Description Usage Arguments Details Value Author(s) Examples

Description

Lotka-Volterra system

Usage

1
predatorprey(lambda = 1, epsilon = 0.001, delta = 1, eta = 0.001)

Arguments

lambda

coefficient for dx = f(x)

epsilon

coefficient for dx = f(xy)

delta

coefficient for dy = g(y)

eta

coefficient for dy = g(xy)

Details

derivate function for system

dx = f(x,y) = (lambda - epsilon*y)*x

dy = g(x,y) = (-delta + eta*x)*y

Value

closure calculating the derivative based on vector arguments (x,y).

Author(s)

Thomas Wutzler

Examples

 1
 2
 3
 4
 5
 6
 7
 8
 9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
fDeriv <- predatorprey(lambda=3, epsilon=2, delta=3, eta=2)


fDeriv(1,2)


if( FALSE ){    # do not run on R CMC check


    require(snowfall)


    # test if closure works also on remote process


    sfInit(TRUE,2)


    argsL <- list( p1=c(1,2), p2=c(2,2) )


    sfLapply( argsL, fDeriv )   # works :)


}

pplane documentation built on May 2, 2019, 6:07 p.m.