如何在一个矢量中重复1:20的整数？
我想要像
这样的东西s <- 1,1,1,2,2,2,3,3,3 etc.....
（除了20 1＆s;然后是20 2＆s;然后20 3＆＃39; s ......你明白了）
我正在尝试这个
l <- 1:20
S <- for(i in l) rep(i, 20)
一个内衬会很棒，就像这样
S <- for (i in 1:20, rep(i, 20))
但我很挣扎。
谢谢，
杰西
答案 0 :(得分：0)
所以答案肯定是
s <- as.numeric(rep(1:20, each = 20))
但是如果我想做这样的事情
y <- 3500, 3750, 4000, 4250.... 6000
会
y <- 3250 + rep(250, 11)
工作？
尽我所能回答......
a <- rep(1:20, each=8000)
b <- rep(rep(1:20, each=400), 20)
c <- rep(rep(rep(1:20, each=20), 20), 20)
d <- rep(1:20, 8000)
df <- cbind(a,b,c,d)
这应该是整数1:20在4乘160000矩阵中的唯一组合....