R for循環向量1,2,2,3,3,3,4,4,4,4，..，10，

Question

我一直在嘗試用for循環在R中創建矢量1,2,2,3,3,3,4,4,4,4,...,10 。 但是我的代碼似乎不起作用...

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

有人可以幫我嗎？ 提前致謝！

Answer 1

最好做到沒有任何循環： rep(1:10, 1:10) : rep(1:10, 1:10) : rep(1:10, 1:10)
但是，如果您確實必須使用嵌套循環來執行此操作，那么它將起作用：

vector = c()
for(i in 1:10) { 
    for(j in 1:i) {
       vector = c(vector, i) 
    }
}

Answer 2

這個怎么樣：

vector=rep(1:10,1:10)