R 判断语句

R 语言提供了以下类型的判断语句：

• if 语句

• if...else 语句

• switch 语句

if 语句

一个 if 语句 由一个布尔表达式后跟一个或多个语句组成。

语法格式如下：

if(boolean_expression) {
    // 布尔表达式为真将执行的语句
}

如果布尔表达式 boolean_expression  为 ture 执行这里面的代码，如果 为 false 则不执行。

x <- 50L
if(is.integer(x)) {
   print("X 是一个整数")
}

执行以上代码，输出结果为：

[1] "X 是一个整数"

if...else 语句

一个 if 语句 后可跟一个可选的 else 语句，else 语句在布尔表达式为假时执行。

语法格式如下：

if(boolean_expression) {
    // 如果布尔表达式为真将执行的语句
} else {
    // 如果布尔表达式为假将执行的语句
}

如果布尔表达式 boolean_expression 为 true，则执行 if 块内的代码。如果布尔表达式为 false，则执行 else 块内的代码。

x <- c("google","nhooo","taobao")

if("nhooo" %in% x) {
   print("包含 nhooo")
} else {
   print("不包含 nhooo")
}

执行以上代码，输出结果为：

[1] "包含 nhooo"

如果有多个条件判断，可以使用 if...else if...else：

if(boolean_expression 1) {
    // 如果布尔表达式 boolean_expression 1 为真将执行的语句
} else if( boolean_expression 2) {
    // 如果布尔表达式 boolean_expression 2 为真将执行的语句
} else if( boolean_expression 3) {
    // 如果布尔表达式 boolean_expression 3 为真将执行的语句
} else {
    // 以上所有的布尔表达式都为 false 时执行
}

x <- c("google","nhooo","taobao")

if("weibo" %in% x) {
   print("第一个 if 包含 weibo")
} else if ("nhooo" %in% x) {
   print("第二个 if 包含 nhooo")
} else {
   print("没有找到")
}

执行以上代码，输出结果为：

[1] "第二个 if 包含 nhooo"

switch 语句

一个 switch 语句允许测试一个变量等于多个值时的情况。每个值称为一个 case。

语法格式如下：

switch(expression, case1, case2, case3....)

switch 语句必须遵循下面的规则：

• switch 语句中的 expression 是一个常量表达式，可以是整数或字符串，如果是整数则返回对应的 case 位置值，如果整数不在位置的范围内则返回 NULL。

• 如果匹配到多个值则返回第一个。

• expression如果是字符串，则对应的是 case 中的变量名对应的值，没有匹配则没有返回值。

• switch 没有默认参数可用。

以下示例返回第三个值：

x <- switch(
   3,
   "google",
   "nhooo",
   "taobao",
   "weibo"
)
print(x)

执行以上代码，输出结果为：

[1] "taobao"

如果是字符串返回字符串变量对应的值：

you.like<-"nhooo"
switch(you.like, google="www.google.com", nhooo = "www.xxs100.com", taobao = "www.taobao.com")

执行以上代码，输出结果为：

[1] "www.xxs100.com"

如果整数不在范围内的则返回 NULL

> x <- switch(4,"google","nhooo","taobao")
> x
NULL
> x <- switch(4,"google","nhooo","taobao")
> x
NULL