# NOT RUN {
# toy example to show use
# and keep execution time low
# }
# NOT RUN {
dataInfo <- rerddap::info('erdHadISST')
# }
# NOT RUN {
parameter <- 'sst'
xcoord <- c(-130.5, -130.5)
ycoord <- c(40.5, 40.5)
tcoord <- c('2006-01-16', '2006-01-16')
extract <- rxtracto_3D(dataInfo, parameter, xcoord = xcoord, ycoord = ycoord,
tcoord = tcoord)
# }
# NOT RUN {
# 2-D example getting bathymetry
dataInfo <- rerddap::info('etopo360')
parameter <- 'altitude'
extract <- rxtracto_3D(dataInfo, parameter, xcoord = xcoord, ycoord = ycoord)
# Dataset that has depth also
# 3 months of subsurface temperature at 70m depth from SODA 2.2.4
dataInfo <- rerddap::info('erdSoda331oceanmday')
parameter = 'temp'
xName <- 'longitude'
yName <- 'latitude'
zName <- 'depth'
xcoord <- c(230.25, 250.25)
ycoord <- c(30.25, 43.25)
zcoord <- c(5.03355, 15.10065)
tcoord <- c('2010-10-15', '2010-12-15')
extract <- rxtracto_3D(dataInfo, parameter, xcoord = xcoord, ycoord = ycoord,
zcoord = zcoord, tcoord = tcoord, xName = xName,
yName = yName, zName = zName)
# }
# NOT RUN {
# }
Run the code above in your browser using DataLab