Ускорьте поиск кода разницы между каждым 12-м элементом в векторе - PullRequest
0 голосов
/ 26 января 2020

У меня есть вектор длиной более 200 000. Для простоты скажем, что это:

x <- c(1:96)

Что я хочу сделать, это сгенерировать вектор, содержащий разницу между числом и следующим двенадцатым числом в векторе. В этом случае он будет генерировать такой вектор:

diff <- c( (13 - 1) = 12, (14 - 2) = 12, (15 - 3) = 12, ...)

Я надеюсь, что этот пример имеет смысл (только для описания). В настоящее время я запускаю следующее для l oop, чтобы сгенерировать его:

diff <- c()
for (k in 1:length(x)){
   d <- x[k+12] - x[k]
   diff <- c(diff, d)
}

Это генерирует то, что я хочу, но оно работает очень медленно для больших векторов. Если у кого-то есть предложения о том, как это ускорить, я был бы признателен!

Добро пожаловать на сайт PullRequest, где вы можете задавать вопросы и получать ответы от других членов сообщества.
...