0

ベクトルで整数 1:20 をそれぞれ 20 回繰り返すにはどうすればよいですか?

私は何かが欲しい

s <- 1,1,1,2,2,2,3,3,3 etc.....

(ただし、1 が 20 個、2 が 20 個、3 が 20 個.... お分かりいただけると思います)

私はこれを試しています

l <- 1:20
S <- for(i in l) rep(i, 20)

ワンライナーは素晴らしいだろう、このようなもの

S <- for (i in 1:20, rep(i, 20))

しかし、私は苦労しています。

ありがとう、

ジェシー

4

1 に答える 1

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)

これは、4 x 160000 マトリックスの整数 1:20 の一意の組み合わせである必要があります....

于 2014-04-03T01:46:22.487 に答える