## make some play data
dataGroup <- data.frame(Longitude = c(1, 1.01, 1.02, 1.04, 1.05, 1.03, 1),
Latitude = c(1, 1.01, 1.02, 1.03, 1.021, 1.01, 1),
ID = rep("A", 7),
DateTime = format(
lubridate::ymd_hms("2021-01-01 00:00:00") +
lubridate::hours(0:6)
)
)
## project tracks
tracks <- projectTracks(dataGroup, projType = "azim", custom = TRUE)
## estimate utilization distributions for each track
KDE <- estSpaceUse(tracks, scale=10, levelUD = 50)
## map it
mapKDE(KDE)
Run the code above in your browser using DataLab