diveMove-package {diveMove} | R Documentation |
This package is a collection of functions for visualizing, and analyzing depth and speed data from time-depth recorders TDRs. These can be used to zero-offset correct depth, calibrate speed, and divide the record into different phases, or time budget. Functions are provided for calculating summary dive statistics for the whole record, or at smaller scales within dives.
Sebastian P. Luque spluque@gmail.com
A vignette with a guide to this package is available by doing
'vignette("diveMove")'.
TDR-class
,
calibrateDepth
,
calibrateSpeed
,
timeBudget
,
stampDive
.
## read in data and create a TDR object (sealX <- readTDR(system.file(file.path("data", "dives.csv"), package="diveMove"), speed=TRUE)) if (dev.interactive(orNone=TRUE)) plotTDR(sealX) # interactively pan and zoom ## detect periods of activity, and calibrate depth, creating ## a 'TDRcalibrate' object if (dev.interactive(orNone=TRUE)) dcalib <- calibrateDepth(sealX) (dcalib <- calibrateDepth(sealX, offset=3)) # zero-offset correct at 3 m if (dev.interactive(orNone=TRUE)) { ## plot all readings and label them with the phase of the record ## they belong to, excluding surface readings plotTDR(dcalib, labels="phase.id", surface=FALSE) ## plot the first 300 dives, showing dive phases and surface readings plotTDR(dcalib, diveNo=seq(300), labels="dive.phase", surface=TRUE) } ## calibrate speed (using changes in depth > 1 m and default remaining arguments) (vcalib <- calibrateSpeed(dcalib, z=1)) ## Obtain dive statistics for all dives detected dives <- diveStats(vcalib) head(dives) ## Attendance table att <- timeBudget(vcalib, FALSE) # taking trivial aquatic activities into account att <- timeBudget(vcalib, TRUE) # ignoring them ## Add trip stamps to each dive stamps <- stampDive(vcalib) sumtab <- data.frame(stamps, dives) head(sumtab)