| lande {primer} | R Documentation |
A function for the metaapopulation dynamics, for use with ode in the deSolve package.
lande(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>
P. Kareiva and U. Wennergren. 1995. Connecting landscape patterns to ecosystem and population processes. Nautre, 373:299–302.
R. Lande. 1987. Extinction thresholds in demographic models of territorial populations. American Naturalist, 130:624–635.
M.H.H. Stevens. 2009. A Primer of Ecology with R. Use R! Series. Springer.
gotelli, hanski,levins, MetaSim clogistic
## The function is currently defined as
function (t, y, parms)
{
p <- y[1]
with(as.list(parms), {
dp <- ci * p * (1 - D - p) - e * p
return(list(dp))
})
}
library(deSolve)
p <- c(ci=.1, e=.01, D=.5)
time <- 1:10
initialN <- .3
out <- ode(y=initialN, times=time, func=lande, parms=p)
plot(time, out[,-1], type='l')