按指定顺序创建序列

Question

我期待使用How to create a combined sequence of constant length but starting at different values in R?

中的任何方法创建序列

我需要的顺序是

1 3 5 2 5 8 3 7 11 4 9 14

在这里，你可以找到一个模式。前三个数字相差2，第二组3个数字相差3，第三组相差4，第四组相差5。

Answer 1

n <- 1:4
diffs <- 2:5
times <- 3
out <- rep(n, each = 3) + c(outer(0:2, diffs, `*`))
# [1]  1  3  5  2  5  8  3  7 11  4  9 14
# or: out <- c(sapply(seq_along(n), function(i) seq(i, length.out = 3, by = diffs[i])))

Answer 2

这是另一种方式：

as.vector(mapply(seq, 1:4, by=2:5, length.out=3))
# [1]  1  3  5  2  5  8  3  7 11  4  9 14