Binds vertical profiles (vp) into a vertical profile time series
(vpts), sorted on datetime. 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 object or a vector of these.
A vp, vpts object 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 on datetime 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.
# Split the example 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]
# Bind the two vpts together
vpts1_and_2 <- bind_into_vpts(vpts1, vpts2)
# Verify that the binded vpts now has 20 profiles, 10 from vpts1 and 10 from
# vpts2
summary(vpts1_and_2)
#> 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