R repeat循环语句图解实例

重复循环用于迭代代码块。这是一种特殊的循环, 其中没有条件可以退出循环。对于退出, 我们包括一个带有用户定义条件的break语句。循环的此属性使其不同于其他循环。

借助R中的repeat关键字构造重复循环。在R中构造无限循环非常容易。

repeat循环的基本语法如下：

repeat { 
   commands 
   if(condition) {
      break
   }
}

流程图

1. 首先, 我们必须初始化变量, 然后变量才能进入重复循环。
2. 该循环将在循环内执行语句组。
3. 之后, 我们必须使用循环内的任何表达式退出。
4. 它将检查条件。它将执行一个break语句退出循环
5. 如果条件为真。
6. 如果条件为假, 则重复循环内的语句将再次执行。

范例1：

v <- c("Hello", "repeat", "loop")
cnt <- 2
repeat {
   print(v)
   cnt <- cnt+1
   
   if(cnt > 5) {
      break
   }
}

输出

范例2：

sum <- 0
{
	n1<-readline(prompt="Enter any integer value below 20: " )
	n1<-as.integer(n1)
}
repeat{
	sum<-sum+n1
	n1=n1+1
	if(n1>20){
		break
	}
}
cat("The sum of numbers from the repeat loop is: ", sum)

输出

示例3：无限重复循环

total<-0
number<-readline(prompt="please enter any integer value: ")
repeat{
total=total+number
number=number+1
cat("sum is =", total)
}

输出

示例4：使用next重复循环

a <- 1          
repeat {    
  if(a == 10)  
    break  
  if(a == 7){  
    a=a+1
    next     
  }
  print(a)  
  a <- a+1    
}

输出

范例5：

terms<-readline(prompt="How many terms do you want ?")
terms<-as.integer(terms)
i<-1
repeat{
	print(paste("The cube of number", i, "is =", (i*i*i)))
	if(i==terms)
		break
	i<-i+1
}

输出