# NOT RUN {
# Load the example dataset of sparrow detections from package
data(sparrow.detections)
# Compute perpendicular, off-transect distances from the observer's sight distance and angle
sparrow.detections$dist <- perp.dists(obs.dist=sparrow.detections$sightdist,
obs.angle=sparrow.detections$sightangle)
# Proceed to fitting the detection function with F.dfunc.estim
# }
Run the code above in your browser using DataLab