ifelse()
我們一般使用if else語句進行變量賦值時,會這樣寫:
if(condition) {x <- 1} else {x <- 2}
實際上可以直接:
x <- if(condition) 1 else 2
另一個快速判斷的方法:ifelse(test, yes, no)
厌殉,即:
x <- ifelse(condition, 1, 2)
當(dāng)有多個選擇時,switch可以很方便地縮短if…else if…語句何暮。這個技巧在需要根據(jù)之前的抉擇指定變量的不同取值時非常有用裤园。例如:
if(dataset == 'Zhu'){
REF <- 1
} else if(dataset == 'Wilk'){
REF <- 2
} else if(dataset == 'Stephenson'){
REF <- 3
} else if(dataset == 'Hao'){
REF <- 4
} else if(dataset == 'Monaco'){
REF <- 5
}
改用switch語句可以寫為:
REF <- switch(dataset,
'Zhu' = 1,
'Wilk' = 2,
'Stephenson' = 3,
'Hao' = 4,
'Monaco' = 5)