library(oce)
# CTD data
data(ctd)
plot(ctd)
plot(subset.oce(ctd, pressure>10))
# ADP example, subsetted by time and distance
data(adp)
adpNear <- subset.oce(adp, distance < 10)
# Note that the data may be accessed directly, as below
adpNearEarly <- subset.oce(adpNear, time < mean(adpNear[["time"]]))
plot(adpNearEarly)
Run the code above in your browser using DataLab