new_data(pedestrian)
new_data(pedestrian, keep_all = TRUE)
new_data(pedestrian, n = 3)
new_data(pedestrian, n = -2)
tsbl <- tsibble(
date = rep(as.Date("2017-01-01") + 0:2, each = 2),
group = rep(letters[1:2], 3),
value = rnorm(6),
key = group
)
append_row(tsbl)
append_row(tsbl, n = 2)
append_row(tsbl, n = -2)
Run the code above in your browser using DataLab