optim
and ctmm.loglike
to maximize the likelihood function of continuous-time movement models described in Fleming et al (2014) and Fleming et al (2015), given 2D animal tracking data.ctmm(tau=NULL,isotropic=FALSE,error=FALSE,...)
ctmm.fit(data,CTMM=ctmm(),control=list(),...)
ctmm.select(data,CTMM,verbose=FALSE,IC="AICc",...)
telemetry
object.ctmm
movement-model object containing the initial parameter guesses conforming to the basic structure of the model hypothesis.optim
, but with parscale
overwritten with reasonable defaults.optim
.TRUE
, else return only the selected model."AICc"
is currently supported.ctmm.fit
returns the maximum likelihood ctmm
movement-model object with the following components:
[object Object],[object Object],[object Object],[object Object],[object Object],[object Object],[object Object],[object Object],[object Object],[object Object]ctmm
parameter guess can be the output of variogram.fit
or the function ctmm(...)
with the argument tau
explained below and optionally isotropic=TRUE
for a distribution that is symmetric in x
and y
.
tau
is an ordered array of autocorrelation timescales.
If length(tau)==0
, then an IID bi-variate Gaussian model is fit to the data.
If length(tau)==1
, then an Ornstein-Uhlenbeck (OU) model (Brownian motion restricted to a finite home range) is fit the data, where tau
is the position autocorrelation timescale. tau=Inf
then yields Brownian motion (BM).
If length(tau)==2
, then the OUF model (continuous-velocity motion restricted to a finite home range) is fit to the data, where tau[1]
is again the position autocorrelation timescale and tau[2]
is the velocity autocorrelation timescale. tau[1]=Inf
then yields integrated Ornstein-Uhlenbeck (IOU) motion, which is a spatially unrestricted continuous-velocity process.
More models will be implemented in the future.variogram.fit
, summary.ctmm
, ctmm.loglike
, optim
.# Load package and data
library(ctmm)
data(buffalo)
cilla <- buffalo[[1]]
# Fit a continuous-velocity model with tau ~ c(10 days,1 hour)
# also see help(variogram.fit)
GUESS <- ctmm(tau=c(10*24*60^2,60^2))
FIT <- ctmm.fit(cilla,GUESS)
# some human-readable information
summary(FIT)
Run the code above in your browser using DataLab