# NOT RUN {
niclas <- track.properties.3d(niclas)[2:nrow(niclas), ]
P <- get.densities.3d(
turnAngle = niclas$t, liftAngle = niclas$l, stepLength = niclas$d,
deltaLift = diff(niclas$t), deltaTurn = diff(niclas$l), deltaStep = diff(niclas$d),
gradientAngle = NULL, heightEllipsoid = NULL, heightTopo = NULL, maxBin = 25
)
# }
Run the code above in your browser using DataLab