r - 向量中循环数据的完整性检查

Question

我有一个长度为“l”的向量，它必须由严格指定的循环序列组成，例如“1 2 3”

x <- c(1,2,3,1,2,3,1,2,3,1,3,1,2,3,1,2,3,1,2,3,1,2,3,2,3,1,2,3,1,2,3,1,2,3,1,2,3)

但它包含间隙，例如:“1 3”或“2 3”或序列违规的其他类似变体，我如何按顺序查找错误并删除那些不完整的序列？

Answer 1

这是一个使用 gregexpr 的基本 R 选项

v <- c(1, 2, 3)
res <- rep(v, length(unlist(gregexpr(toString(v), toString(x)))))

这使

> res
 [1] 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3