Displaying 1 result from an estimated 1 matches for "hrfun".
Did you mean:
rfun
2012 Dec 07
0
apply a function at: dateX, dateX+1, dateX+2, ....
...framesxy) <- c("Long", "Lat")
myframe3 <- cbind(myframe2, myframesxy)
myframe3$Longitude <- NULL
myframe3$Latitude <- NULL
myframe3
str(myframe3)
# and this is what I did with the help of Dennis Murphy last week:
myframe3$day <- as.Date(myframe3$myframestime)
hrfun <- function(d)
{
dxy <- d[, c("Long", "Lat")]
d_ltraj <- as.ltraj(dxy, d$myframestime, id = d$AnimalID)
dLiker <- liker (d_ltraj, sig2 = 18, rangesig1= c(1, 100) )
dBB <- kernelbb(d_ltraj, sig1=dLiker$Ernie$sig1, sig2=18)
data.frame(AnimalID = uniqu...