按时间戳 R 滑动 windows

Question

我有一个数据框 "data"，其中 V11 列包含每一行的时间戳。我想添加一个滑动 windows 到 select 适当的行尊重时间戳。滑动 windows 的长度为 200 毫秒，它应该每 100 毫秒移动一次。然而，这些值可以是用户可配置的。因此，行的第一个 selection 将从时间 0 到 200 毫秒，接下来的 100 到 300 毫秒，依此类推。我看过计算平均值的包，但我需要自己计算。

有什么想法吗？

Answer 1

apply_function_on_sliding_window <- function(data, col, start, end, fun) {
    range_start = data[col] >= start
    range_end = data[range_start, col] <= end
    return(fun(data[range_start, col][range_end])
}

apply_function_on_sliding_window(data, V11, start, end, mean)

按时间戳 R 滑动 windows

Sliding windows by timestamp R

r

timestamp

sliding-window