📜  R重复循环

📅  最后修改于: 2021-01-08 09:36:05             🧑  作者: Mango

R重复循环

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

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

repeat循环的基本语法如下:

repeat { 
   commands 
   if(condition) {
      break
   }
}

流程图R重复循环

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

范例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
}

输出量