This file may be read with read.ctd.aml(). It is based on a file donated by Ashley Stanek, which was shortened to just 50 points for inclusion in oce, and which had some identifying information (serial number, IP address, and WEP code) zeroed-out.

Examples

ctd <- read.ctd.aml(system.file("extdata", "ctd_aml.csv.gz", package="oce"))
summary(ctd)
#> CTD Summary
#> -----------
#> 
#> * File:                "/private/var/folders/8b/l4h64m1j22v5pb7vj049ff140000gn/T/RtmpWhqPHy/temp_libpath11047654b1cd3/oce/extdata/ctd_aml.csv.gz"
#> * Mean Location:       70.228N 145.85W
#> * Time:          2021-07-25 18:22:28 to 2021-07-25 18:22:30 (50 samples, mean increment 0.04020408 s)
#> * Data Overview
#> 
#>                                             Min.                Mean                Max. Dim. NAs         OriginalName
#>     scan                                       1                25.5                  50   50   0                    -
#>     salinity [PSS-78]                     5.5779              26.323              28.503   50   0                    -
#>     temperature [°C, ITS-90]               3.414              4.8729               5.671   50   0      Temperature (C)
#>     pressure [dbar]                         0.22              0.8592                1.69   50   0                    -
#>     conductivity [mS/cm]                   6.281              25.687              27.139   50   0 Conductivity (mS/cm)
#>     time                     2021-07-25 18:22:28 2021-07-25 18:22:29 2021-07-25 18:22:30   50   0                    -
#>     Date                                      NA                  NA                  NA   50   0                 Date
#>     Time                                      NA                  NA                  NA   50   0                 Time
#>     battery [V]                             7.93                7.93                7.93   50   0          Battery (V)
#> 
#> * Processing Log
#> 
#>     - 2024-02-19 11:24:25 UTC: `create 'ctd' object`
#>     - 2024-02-19 11:24:25 UTC: `as.ctd(salinity = S, temperature = data$temperature, pressure = data$pressure,     conductivity = data$conductivity, serialNumber = serialNumber,     longitude = longitude, latitude = latitude, debug = debug -         1L)`
#>     - 2024-02-19 11:24:25 UTC: `read.ctd.aml(file = system.file("extdata", "ctd_aml.csv.gz",     package = "oce"))`
plot(ctd)