使用'While'函數計算循環次數

Question

我想計算函數在超過條件之前重複的次數。例如;

y=0 
while(y<10) { 
    y=y+2 
    print(y) 
} 

[1] 2 
[1] 4 
[1] 6 
[1] 8 
[1] 10 

顯然，函數重複5次，但我怎麼能在R中顯示這個？

Answer 1

你差點沒錢了。

y <- i <- 0 
while(y < 10) { 
    i <- i + 1 
    y <- y + 2 
    print(y) 
} 
print(sprintf("The loop repeated %s times.", i)) 

Answer 2

嘗試使用遞歸。 例如，您要將限制設置爲執行五次。

 

     function test(int y,int current,int limit){ 
     if (current>limit) return; 
     print (y); 
     test(y+2,current+1,limit); 

} 

調用函數主代碼中：

 

    int start=0; 
    test(start,1,5);