控制流在正常情况下，R程序中的语句是从上至下顺序执行的。但有时你可能希望重复执行某些语句，仅在满足特定条件的情况下执行另外的语句。这就是控制流结构发挥作用的地方了。R拥有一般现代编程语言中都有的标准控制结构。包括用于条件执行的结构，用于循环执行的结构。
1. 重要概念：
- 语句（statement）是一条单独的R语句或一组复合语句（包含在花括号{ }中的一组R语句，使用分号分隔）；
- 条件（cond）是一条最终被解析为真（TRUE）或假（FALSE）的表达式；
- 表达式（expr）是一条数值或字符串的求值语句；
- 序列（seq）是一个数值或字符串序列
2. 循环结构
循环结构重复地执行一个或一系列语句，直到某个条件不为真为止。循环结构包括for和while结构。
for(var in seq) expr
image.png
while(cond) expr
注意：请确保括号内while的条件语句能够改变，即让它在某个时刻不再为真——否则循环将永不停止！
image.png
3. 条件结构
3.1 if-else
if(cond) expr
3.2 ifelse
if(cond) expr1 else expr2
image.png
3.3 switch
switch(expr, … , …）
其中的…表示与expr的各种可能输出值绑定的语句。
image.png
4 用户自编函数
R的最大优点之一就是用户可以自行添加函数。事实上，R中的许多函数都是由已有函数构成的。一个函数的结构如下：
myfunction <- function(arg1,arg2,……）{
statements
return(object)
}
## 自定义函数mydate，在函数声明中为参数指定的值将作为默认值，比如不指定type，则long极为默认格式
mydate <- function(type=c("long")) {
### 使用switch函数选择执行语句
switch(type,
long=format(Sys.time(),"%A %B %d %Y"),
short=format(Sys.time(),"%m-%d-%y"),
## cat()将在输入的日期格式不匹配long或者short时运行
cat(type,"is not recognized type\n"))
}
### 查看日期
mydate("long")
mydate("short")
mydate("none")
注：有若干函数可以用来作为函数添加错误捕获或者纠正功能
warning()可以生成一条错误信息
message()可以生成一条诊断信息
stop()可以停止当前表达式并提示错误
image.png
image.png
