Tag: 传染媒介

如何索引vector序列中的vector序列

我有一个问题的解决scheme,涉及循环和工作,但我觉得我失去了一些涉及更有效的实现。 问题:我有一个数字向量序列,并且想要识别第一个向量的另一个向量中的起始位置。 它是这样工作的: # helper function for matchSequence # wraps a vector by removing the first n elements and padding end with NAs wrapVector <- function(x, n) { stopifnot(n <= length(x)) if (n == length(x)) return(rep(NA, n)) else return(c(x[(n+1):length(x)], rep(NA, n))) } wrapVector(LETTERS[1:5], 1) ## [1] "B" "C" "D" "E" NA wrapVector(LETTERS[1:5], 2) ## [1] […]