# NOT RUN {
TideTable(dataInput=observation, asdate=observation$observation_date[1],
astime=observation$observation_time[1],
aedate="1991/05/01", aetime="21:00:00", ssdate="1995/01/01",
sstime="00:00:00", sedate="1995/01/31", setime="21:00:00")
# }
Run the code above in your browser using DataLab