# NOT RUN {
# Load package and data
library(ctmm)
data(buffalo)
# Extract movement data for a single animal
Cilla <- buffalo$Cilla
# Fit a movement model
GUESS <- ctmm.guess(Cilla,interactive=FALSE)
FIT <- ctmm.fit(Cilla,GUESS)
# Estimate and summarize the AKDE
UD <- akde(Cilla,FIT)
summary(UD)
# }
Run the code above in your browser using DataLab