# \donttest{
data(deer)
# track_xyt ---------------------------------------------------------------
# Default settings
rp1 <- random_points(deer)
plot(rp1)
# Ten random points for each observed point
rp <- random_points(deer, n = nrow(deer) * 10)
plot(rp)
# Within a home range -----------------------------------------------------
hr <- hr_mcp(deer, level = 1)
# 100 random point within the home range
rp <- random_points(hr, n = 100)
plot(rp)
# 100 regular point within the home range
rp <- random_points(hr, n = 100, type = "regular")
plot(rp)
# 100 hexagonal point within the home range
rp <- random_points(hr, n = 100, type = "hexagonal")
plot(rp)
# }
Run the code above in your browser using DataLab