我从 R 语言开始，我必须使用 rep()and创建这个向量seq()。
1 2 3 4 5 2 3 4 5 6 3 4 5 6 7 4 5 6 7 8 5 6 7 8 9
我一直在尝试一些东西，但我没有实现它。
3028 次
3 回答
3
我们可以试试
1:5 + rep(0:4,each=5)
#[1] 1 2 3 4 5 2 3 4 5 6 3 4 5 6 7 4 5 6 7 8 5 6 7 8 9
于 2015-11-01T18:11:10.430 回答
3
还是像这样？
c(sapply(1:5, function(x) seq(x,x+4)))
[1] 1 2 3 4 5 2 3 4 5 6 3 4 5 6 7 4 5 6 7 8 5 6 7 8 9
于 2015-11-01T18:15:38.470 回答
2
只是为了它的运动，使用它的功能添加一个data.table版本shift
unlist(data.table(1:10)[, shift(V1, 5:1)][6:10], use.names = FALSE)
# [1] 1 2 3 4 5 2 3 4 5 6 3 4 5 6 7 4 5 6 7 8 5 6 7 8 9
于 2015-11-01T18:42:42.820 回答