library(oce)
data(ctd)
ctd2 <- ctd
ctd2[["temperature"]] <- ctd[["temperature"]] + 0.5
ctd2[["latitude"]] <- ctd[["latitude"]] + 0.1
section <- makeSection(ctd, ctd2)
summary(section)
# Below is how to create a section from well-named CSV files
# that contain consecutive stations
plot(sectionSmooth(sectionGrid(makeSection(dir("*.csv")))))
Run the code above in your browser using DataLab