powered by
ode
deSolve
compcol(t, y, params)
Stevens. M.H.H. 2009. A Primer of Ecology with R. Use R! Series. Springer.
levins
compcolM
succniche
library(deSolve) pars <- c(c1 = .3, c2 = 1, m1 = .1, m2 = .1) pops <- c(.1,.1) out <- ode(y=pops, t=0:20, fun=compcol, parms = pars) matplot(out[,1], out[,-1], type='l')
Run the code above in your browser using DataLab