r - 生成重复序列

Question

我需要使用 R 生成以下格式的向量：

1:10, 1:10, 11:20, 11:20, ... 121:130, 121:130

有没有比创建 12 个向量然后每个向量重复两次更简单的方法？

score 18 · Accepted Answer

18

你也可以这样做：

rep(1:10, 26) + rep(seq(0,120,10), each=20)

于 2010-06-23T16:28:29.500 回答

score 3 · Accepted Answer

3

这是你想要的吗？

unlist(lapply(rep(seq(1, 121, by=10), each=2), function(x) seq(x, x+9)))

于 2010-06-23T15:14:06.933 回答

score 3 · Accepted Answer

其他方式：

x <- matrix(1:130, 10, 13)
c(rbind(x, x))

可能更有效的版本：

x <- 1:130
dim(x) <- c(10,13)
c(rbind(x, x))

score 2 · Accepted Answer

或者，您可以使用和的组合rep，outer例如：

c(outer(1:10,rep(0:12,each=2),function(x,y)10*y+x))

score 1 · Accepted Answer

我想这对你有用。

x <- ((0:12)*10)+1
y <- x + 9

repeatVectors <- function(x,y){
    rep(seq(x,y),2)
}

z <- mapply(repeatVectors, x,y)
z <- as.vector(z)

score 1 · Accepted Answer

1

使用方法split是

unlist(rep(split(seq_len(130), rep(1:13, each=10)), each=2), use.names=FALSE)

于 2017-07-05T19:18:55.673 回答

6 回答 6