problem with read.section (dates not communicated to ctd objects?)

[dankelley]

Code:

library(oce)
a03 <- read.section("http://cchdo.ucsd.edu/data/onetime/atlantic/a03/a03_hy1.csv", 
            ship="R/V Professor Multanovskiy", 
            scientist="Vladimir Tereschenkov",
            institute="SIO")
Gulf.Stream <- subset(a03, indices=124:100)
Gulf.Stream.gridded <- section.grid(Gulf.Stream, p=seq(0, 5000, 100))
data(coastline.world)
plot(Gulf.Stream.gridded, coastline=coastline.world, map.xlim=c(-80,-60))
print(summary(a03$data$station[[1]]))

output

CTD Summary
-----------

* Source:              "http://cchdo.ucsd.edu/data/onetime/atlantic/a03/a03_hy1.csv"
* Date:                1993-09-23 22:22:00 
* Institute:           SIO 
* Scientist:           Vladimir Tereschenkov 
* Ship:                R/V Professor Multanovskiy 
* Cruise:              A03 
* Location:            36.8758N  8.5263W 
* Station:             3 
* Start time:           
* Deployed:             
* Recovered:            
* Water depth:         202 m
* No. of levels:       5 

The heading "Start time:" (and next 2) should not be given.

[dankelley]

Fixed