Есть ли способ эффективно рассчитать скользящее среднее для объекта класса Rle без предварительного преобразования его в числовой вектор?
Например:
rl <- Rle(c(1,1,1,1,2,2,3,3,2,2))
Я хочу получить:
zoo::rollmean(as.integer(rl), k=3)
, но этот подход не работает для больших векторов.Есть другие идеи?