添加序列與向量的每個元素

Question

我有一個矢量下面

x <- c(1,32,60,86,115,142,171,198) 

所示我想創建的序列爲SEQ（X [I]中，x [1] + 2，通過= 1 ）爲矢量的每個元素。所產生的載體應該是

1,2,3,32,33,34,60,61,62,86,87,88 .....

我想知道是否有類似的功能代表做這個？感謝您對此的投入。

Answer 1

您可以使用saaply遍歷的x每個元素，並生成一個seq uence數字與c

c(sapply(x, function(x) seq(x, x+2))) 

# [1] 1 2 3 32 33 34 60 61 62 86 87 88 115 116 117 142 143 144 171 172 173 
#  198 199 200 

Answer 2

將它們結合起來，我們可以使用矢量rep

rep(x, each = 3) + 0:2 
#[1] 1 2 3 32 33 34 60 61 62 86 87 88 115 116 117 142 143 
#[18] 144 171 172 173 198 199 200