R语言编写循环语句

比眉伴天荒 2023-07-25 12:43 13阅读 0赞

常用的循环语句主要有**for**循环、**while**循环和**repeat**循环。使用循环语句可以处理很多问题

--------------------

# for循环语句 #

使用格式如下：  
**for (name in expr1) \{expr2\}**  
其中，name是循环变量，在每次循环时从expr1中顺序取值，expr1是一个向量表达式（通常是个序列，如1：20）。expr2通常是一组表达式，当name的值包含在expr1中时，执行expr2的语句，否则循环将终止。  
![在这里插入图片描述][watermark_type_ZmFuZ3poZW5naGVpdGk_shadow_0_text_aHR0cHM6Ly9ibG9nLmNzZG4ubmV0L3FxXzQzMTMzMTky_size_1_color_FFFFFF_t_70]  
在循环过程中，若需要输出每次循环的结果，可使用cat函数或print函数。  
**cat函数：**  
**cat(expr1,expr2,…)**  
expr1，expr2为需要输出的内容，可以为字符串或表达式。例如，若expr1为“name”，则输出字符串“name”，若expr1为变量name，则输出name的值。另外，符号“\\n”表示换行，表示“\\n”后的语句在下一行输出  
![在这里插入图片描述][watermark_type_ZmFuZ3poZW5naGVpdGk_shadow_0_text_aHR0cHM6Ly9ibG9nLmNzZG4ubmV0L3FxXzQzMTMzMTky_size_1_color_FFFFFF_t_70 1]  
**示例：**

n <- c(2, 5, 10)
    for(i in n){
    	x <- sqrt(i)
    	print(x)
    }
    #  运行结果：
    #  [1] 1.414214
    #  [1] 2.236068
    #  [1] 3.162278
    for(i in n){
    	x <- sqrt(i)
    	cat("sqrt(",i,")=",x,"\n")
    }
    #  运行结果：
    #  sqrt( 2 )= 1.414214 
    #  sqrt( 5 )= 2.236068 
    #  sqrt( 10 )= 3.162278

--------------------

# while循环语句 #

**while (cond) \{expr\}**

*  其中：**cond**为判断条件
 *  expr为一个或一组表达式
 *  while循环重复**执行语句expr，直到条件cond不为真为止**

![在这里插入图片描述][watermark_type_ZmFuZ3poZW5naGVpdGk_shadow_0_text_aHR0cHM6Ly9ibG9nLmNzZG4ubmV0L3FxXzQzMTMzMTky_size_1_color_FFFFFF_t_70]  
**示例：**

sum(1:10)
    #  运行结果：
    #  [1] 55
      i <- 1
    sum <- 0
    while (i <= 10) {
    	sum = sum + i
    	i = i + 1
    }
    sum
    #  运行结果：
    #  [1] 55

#### 编程练习 ####

使用while语句生成20个斐波那契数列。

**参考代码：**

a <- 1
    b <- 0
    i <- 1
    while (i <= 20) {
    	print(a)
    	c <- a
    	a <- a + b
    	b <- c
    	i <- i + 1
    }
    #  运行结果：
    #  [1] 1
    #  [1] 1
    #  [1] 2
    #  [1] 3
    #  [1] 5
    #  [1] 8
    #  [1] 13
    #  [1] 21
    #  [1] 34
    #  [1] 55
    #  [1] 89
    #  [1] 144
    #  [1] 233
    #  [1] 377
    #  [1] 610
    #  [1] 987
    #  [1] 1597
    #  [1] 2584
    #  [1] 4181
    #  [1] 6765

--------------------

# repeat-break循环语句 #

**repeat expr**  
**repeat \{if(cond)\{break\}\}**

repeat是无限循环语句，并且会在达到循环条件后，使用break语句直接跳出循环

[watermark_type_ZmFuZ3poZW5naGVpdGk_shadow_0_text_aHR0cHM6Ly9ibG9nLmNzZG4ubmV0L3FxXzQzMTMzMTky_size_1_color_FFFFFF_t_70]: /images/20230528/f27698ff991d413194282d2e4dde3d35.png
[watermark_type_ZmFuZ3poZW5naGVpdGk_shadow_0_text_aHR0cHM6Ly9ibG9nLmNzZG4ubmV0L3FxXzQzMTMzMTky_size_1_color_FFFFFF_t_70 1]: /images/20230528/2576d5562d6e41fda37877b69b4ae02a.png