## load rockfall data set
data("rockfall")
s_1 <- rockfall_eseis
## duplicate data set and shift start time (incl. gap)
s_2 <- s_1
s_2$meta$starttime <- s_2$meta$starttime + 500
## merge data sets
s_merged <- signal_merge(s_1, s_2)
## plot merged data set
plot(s_merged)
## merge and fill gap
s_merged_filled <- signal_merge(s_1, s_2, fill = TRUE)
## plot merged data set
plot(s_merged_filled)
Run the code above in your browser using DataLab