判斷結(jié)構(gòu)要求程序員指定一個或多個要評估或測試的條件，以及條件為真時要執(zhí)行的語句（必需的）和條件為假時要執(zhí)行的語句（可選的）。

下面是大多數(shù)編程語言中典型的判斷結(jié)構(gòu)的一般形式：

R 語言提供了以下類型的判斷語句：

• if 語句
• if...else 語句
• switch 語句
  

if 語句

一個 if 語句 由一個布爾表達(dá)式后跟一個或多個語句組成。

語法格式如下：

if(boolean_expression) {
 // 布爾表達(dá)式為真將執(zhí)行的語句
}

如果布爾表達(dá)式 boolean_expression 為 ture 執(zhí)行這里面的代碼，如果 為 false 則不執(zhí)行。

x <- 50L
if(is.integer(x)) {
   print("X 是一個整數(shù)")
}

執(zhí)行以上代碼，輸出結(jié)果為：

[1] "X 是一個整數(shù)"

if...else 語句

一個 if 語句 后可跟一個可選的 else 語句，else 語句在布爾表達(dá)式為假時執(zhí)行。

語法格式如下：

if(boolean_expression) {
 // 如果布爾表達(dá)式為真將執(zhí)行的語句
} else {
 // 如果布爾表達(dá)式為假將執(zhí)行的語句
}

如果布爾表達(dá)式 boolean_expression 為 true，則執(zhí)行 if 塊內(nèi)的代碼。如果布爾表達(dá)式為 false，則執(zhí)行 else 塊內(nèi)的代碼。

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

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

執(zhí)行以上代碼，輸出結(jié)果為：

[1] "包含 runoob"

如果有多個條件判斷，可以使用 if...else if...else：

if(boolean_expression 1) {
 // 如果布爾表達(dá)式 boolean_expression 1 為真將執(zhí)行的語句
} else if( boolean_expression 2) {
 // 如果布爾表達(dá)式 boolean_expression 2 為真將執(zhí)行的語句
} else if( boolean_expression 3) {
 // 如果布爾表達(dá)式 boolean_expression 3 為真將執(zhí)行的語句
} else {
 // 以上所有的布爾表達(dá)式都為 false 時執(zhí)行
}

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

if("weibo" %in% x) {
   print("第一個 if 包含 weibo")
} else if ("runoob" %in% x) {
   print("第二個 if 包含 runoob")
} else {
   print("沒有找到")
}

執(zhí)行以上代碼，輸出結(jié)果為：

[1] "第二個 if 包含 runoob"

switch 語句

一個 switch 語句允許測試一個變量等于多個值時的情況。每個值稱為一個 case。

語法格式如下：

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

switch 語句必須遵循下面的規(guī)則：

• switch 語句中的 expression 是一個常量表達(dá)式，可以是整數(shù)或字符串，如果是整數(shù)則返回對應(yīng)的 case 位置值，如果整數(shù)不在位置的范圍內(nèi)則返回 NULL。
• 如果匹配到多個值則返回第一個。
• expression如果是字符串，則對應(yīng)的是 case 中的變量名對應(yīng)的值，沒有匹配則沒有返回值。
• switch 沒有默認(rèn)參數(shù)可用。

以下實例返回第三個值：

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

執(zhí)行以上代碼，輸出結(jié)果為：

[1] "taobao"

如果是字符串返回字符串變量對應(yīng)的值：

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

執(zhí)行以上代碼，輸出結(jié)果為：

[1] www.runoob.com

如果整數(shù)不在范圍內(nèi)的則返回 NULL

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

以上就是R語言判斷語句的使用詳解的詳細(xì)內(nèi)容，更多關(guān)于R語言判斷語句的資料請關(guān)注腳本之家其它相關(guān)文章！

最新評論