Get vertical profile time series (VPTS) data from supported sources
Source:R/get_vpts.R
get_vpts.RdGets vertical profile time series data from supported sources and returns it
as a (list of) of vpts objects or a
dplyr::tibble().
Arguments
- radar
Name of the radar (odim code) as a character string (e.g.
"nlhrw"or"fikor").- datetime
Either:
A
POSIXctdatetime (orcharacterrepresentation), for which the data file is downloaded.A
Datedate (orcharacterrepresentation), for which all data files are downloaded.A vector of datetimes or dates, between which all data files are downloaded.
A
lubridate::interval(), between which all data files are downloaded.
- source
Source of the data. One of
"baltrad","uva","ecog-04003"or"rmi". Only one source can be queried at a time. If not provided,"baltrad"is used. Alternatively a local directory can be specified, see details for an explanation of the file format.- return_type
Type of object that should be returned. Either:
"vpts": vpts object(s) (default)."tibble": adplyr::tibble().
Value
Either a vpts object, a list of vpts objects or a tibble. See bioRad::summary.vpts for details.
Details
For more details on supported sources, see vignette("supported_sources").
In that case data is read from the directory, file in the directory
should be structures like they are in the monthly folders of the aloft
repository. To specify an alternative structure the
"getRad.vpts_local_path_format" option can be used. This can, for
example, be used to read daily data. Some example options for the glue
formatters are:
"{radar}/{year}/{radar}_vpts_{year}{month}.csv.gz": The default format, the same structure as the monthly directories in the aloft repository. Or as contained in thetgzfiles in the aloft zenodo repository."{substr(radar, 1,2)}/{radar}/{year}/{radar}_vpts_{year}{month}.csv.gz": The format as in the files in the zenodo aloft repository"{radar}/{year}/{radar}_vpts_{year}{month}{day}.csv": The format as daily data is stored in aloft data
Besides the examples above there is a date object available for formatting.
Examples
if (FALSE) { # interactive()
# Get VPTS data for a single radar and date
get_vpts(radar = "bejab", datetime = "2023-01-01", source = "baltrad")
get_vpts(radar = "bejab", datetime = "2020-01-19", source = "rmi")
# Get VPTS data for multiple radars and a single date
get_vpts(
radar = c("dehnr", "deflg"),
datetime = lubridate::ymd("20171015"),
source = "baltrad"
)
# Get VPTS data for a single radar and a date range
get_vpts(
radar = "bejab",
datetime = lubridate::interval(
lubridate::ymd_hms("2023-01-01 00:00:00"),
lubridate::ymd_hms("2023-01-02 00:14:00")
),
source = "baltrad"
)
get_vpts("bejab", lubridate::interval("20210101", "20210301"))
# Get VPTS data for a single radar, date range and non-default source
get_vpts(radar = "bejab", datetime = "2016-09-29", source = "ecog-04003")
# Return a tibble instead of a vpts object
get_vpts(
radar = "chlem",
datetime = "2023-03-10",
source = "baltrad",
return_type = "tibble"
)
}