# extract data from momentuHMM example
data<-example$m$data
# generate fake angle covariates
u <- rnorm(nrow(data)) # horizontal component
v <- rnorm(nrow(data)) # vertical component
refAngle <- atan2(v,u)
# add turning angle covariate to data
data$cov3 <- circAngles(refAngle=refAngle,data=data)
Run the code above in your browser using DataLab