Hi Ryan,
A simple example would be something like
DATA <- as.telemetry("Movebank.csv")
FITS <- UDS <- list()
for(i in 1:length(DATA))
{
print(i)
GUESS <- ctmm.guess(DATA[[i]],interactive=FALSE)
FITS[[i]] <- ctmm.select(DATA[[i]],GUESS,trace=2)
UDS[[i]] <- akde(DATA[[i]],FITS[[i]])
}
When you get what you want in your loop, if it's still taking a long time, you can upgrade to a parallelized loop with foreach. I have 4 of my cores running analysis on 49 coatis right now.
For longer runs, I recommend save() incrementally, in case you run into trouble somewhere, so you don't have to start over from scratch.
I'm also listing project code on the group description/intro, and there's one there already.
Best,
Chris