levins {primer} | R Documentation |
A function for the classic metaapopulation dynamics, for use with ode
in the deSolve
package.
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')