levins: Classic Metapopulation Model
In primer: Functions and Data for the Book, a Primer of Ecology with R

Description Usage Arguments Value Author(s) References See Also Examples

A function for the classic metaapopulation dynamics, for use with ode in the deSolve package.

1	levins(t, y, parms)

`t`	Argument for time
`y`	A scalar for the population variable
`parms`	Vector or list of parameters

Returns a list of length one, for use with ode in the deSolve package.

Component 1

vector of the state variable (a scalar for the proportion of sites occupied).

Hank Stevens <HStevens@muohio.edu>

Levins, R. (1969) Some demographic and genetic consequences of environmental heterogeneity for biological control. Bulletin of the Entomological Society of America, 15, 237–240.

Stevens, M.H.H. (2009) A Primer of Ecology with R. Use R! Series. Springer.

gotelli, hanski,lande, MetaSim, clogistic

## The function is currently defined as
function (t, y, parms)
{
    p <- y[1]
    with(as.list(parms), {
        dp <- ci * p * (1 - p) - e * p
        return(list(dp))
    })
  }
library(deSolve)
p <- c(ci=.1, e=.01)
time <- 1:10
initialN <- .3
out <- ode(y=initialN, times=time, func=levins, parms=p)
plot(time, out[,-1], type='l')