（入れ子にされた）ループを使ってベクトルを構築するR

Question

私はかなりインターネット上のforaをスキャンしましたが、私の問題に対する明確な答えが見つからなかったので、ここに投稿しました。私が使用しているプログラムはRです

次の問題は解決策が見つからないようです。私はネストされたループを使用してベクトル（1,2,2,3,3,3 ...、10、...、10）を構築することを義務付けられています（したがってrep（）はありません）。これまではすべての要素のリストを作成することができましたが、それを目的のベクトルに変換することはできません。データを行列に変換して転置するなど、かなりの方法を試しました。

これまでのところ、1つの方法では効果がありませんでした。

は、これは私がこれまで持っているものです：事前に

[1] 1 
[1] 2 
[1] 2 
[1] 3 
[1] 3 
[1] 3 
[1] 4 
[1] 4 
[1] 4 
[1] 4 
[1] 5 
[1] 5 
[1] 5 
[1] 5 
[1] 5 
[1] 6 
[1] 6 
[1] 6 
[1] 6 
[1] 6 
[1] 6 
[1] 7 
[1] 7 
[1] 7 
[1] 7 
[1] 7 
[1] 7 
[1] 7 
[1] 8 
[1] 8 
[1] 8 
[1] 8 
[1] 8 
[1] 8 
[1] 8 
[1] 8 
[1] 9 
[1] 9 
[1] 9 
[1] 9 
[1] 9 
[1] 9 
[1] 9 
[1] 9 
[1] 9 
[1] 10 
[1] 10 
[1] 10 
[1] 10 
[1] 10 
[1] 10 
[1] 10 
[1] 10 
[1] 10 
[1] 10 

ありがとう：

for (i in 1:10){ 
    for (j in 1:10) 
    if (j<=i) 
    { 
     x = c(i) 
    print(x) 
    } 
} 

を私に提供しています！

Answer 1

代わりにそれを印刷する、ベクター中に結果を格納する場合は、残っている問題であり、これは、この方法を行うことができる。

result <- vector(mode = "integer") 
k <- 1 
for (i in 1:10){ 
    for (j in 1:10) 
    if (j<=i) 
    { 
     result[k] = c(i) 
     k <- k+1 
    } 
} 
head(result)