data(divesTDR)
## Retrieve the name of the source file
getFileName(divesTDR)
## Retrieve concurrent temperature measurements
temp <- getCCData(divesTDR, "temperature"); head(temp)
temp <- getCCData(divesTDR); head(temp)
## Coerce to a data frame
dives.df <- as.data.frame(divesTDR)
head(dives.df)
## Replace speed measurements
newspeed <- getSpeed(divesTDR) + 2
speed(divesTDR) <- newspeed
Run the code above in your browser using DataLab