【R语言】流程控制
R语言中，常用的流程控制函数有：repeat、while、for、if…else、switch。
1、repeat循环
repeat函数经常与 break 语句或 next 语句一起使用。
repeat ({
x <- sample(c(1:7),1)
message("x = ", x, ",你好吗？")
if (x == 4){
message("x = ", x, ",继续执行下一次循环！")
next
}
if (x == 7){
message("x = ", x, ",跳出循环！")
break
}
})
2、while循环
x <- sample(c(1:10),1)
while (x != 4){
x <- sample(c(1:10),1)
message("x= ", x, ",你好，关关")
}
3、for循环
for 循环通过一个迭代器和一个向量参数执行程序代码，它适用于明确代码需要执行次数的情形。
a <- c(1:10)
for (x in a){
message("x= ", x, ",你好，悦悦！")
}
4、if…else语句
注意，else 必须与 if 语句的右侧大括号在同一行，否则会报错。
x <- 10
if (x > 10){
print("X大于10")
} else{
print("X小于等于10")
}
if...else 可以反复使用：
x <- 10
if (x > 10){
print("Hello")
} else if(x == 10){
print("你好！")
} else {
print ("Bonjour!")
}
if ... else可以合起来一起使用：
x <- 10
y <- ifelse(x > 10, "HELLO", "你好！")
print(x)
print(y)
5、switch语句
switch语句是为了替代会使用很多 if...else 语句的场景，以提高代码的可读性。
x <- "f"
switch (x, beta = "beta分布", gama = "gama分布", f = "f分布", "其它")