Binds vertical profiles (vp) into a vertical profile time series
(vpts), sorted in time. Can also bind multiple vpts of a
single radar into one vpts.
bind_into_vpts(x, ...)
# S3 method for vp
bind_into_vpts(...)
# S3 method for list
bind_into_vpts(x, ...)
# S3 method for vpts
bind_into_vpts(..., attributes_from = 1)A vp, vpts or a vector of these.
A vp, vpts or a vector of these.
integer. Which vpts to copy attributes from (default:
first).
A vpts for a single radar or a list of
vpts for multiple radars. Input vp are sorted in time in the
output vpts.
bind_into_vpts() currently requires profiles to have aligning altitude
layers that are of equal width. Profiles are allowed to differ in the number
of altitude layers, i.e. the maximum altitude
bind_into_vpts(vp): Bind multiple vp into a vpts.
If vp for multiple radars are provided, a list is returned containing
a vpts for each radar.
bind_into_vpts(list): Bind multiple vp objects into a
vpts. If data for multiple radars is provided, a list is returned
containing a vpts for each radar.
bind_into_vpts(vpts): Bind multiple vpts into a single
vpts. Requires the input vpts to be from the same radar.
# load example time series of vertical profiles:
data(example_vpts)
# split the vpts into two separate time series, one containing profile 1-10,
# and a second containing profile 11-20:
vpts1 <- example_vpts[1:10]
vpts2 <- example_vpts[11:20]
# use bind_into_vpts to bind the two together:
vpts1and2 <- bind_into_vpts(vpts1, vpts2)
# verify that the binded vpts now has 20 profiles, 10 from vpts1 and 10 from
# vpts2:
summary(vpts1and2)
#> Regular time series of vertical profiles (class vpts)
#>
#> radar: KBGM
#> # profiles: 20
#> time range (UTC): 2016-09-01 00:02:00 - 2016-09-01 01:18:00
#> time step (s): 240
# extract two profiles:
vp1 <- example_vpts[1]
vp1
#> Vertical profile (class vp)
#>
#> radar: KBGM
#> source:
#> nominal time: 2016-09-01 00:02:00
#> generated by:
vp2 <- example_vpts[2]
vp2
#> Vertical profile (class vp)
#>
#> radar: KBGM
#> source:
#> nominal time: 2016-09-01 00:06:00
#> generated by:
# bind the two profiles back into a vpts:
bind_into_vpts(vp1, vp2)
#> Regular time series of vertical profiles (class vpts)
#>
#> radar: KBGM
#> # profiles: 2
#> time range (UTC): 2016-09-01 00:02:00 - 2016-09-01 00:06:00
#> time step (s): 240