如何在R函数中为参数定义取值范围并修复判断逻辑报错

错误原因 #

你遇到的报错是R语言不支持1 < x < 2这种连续区间比较的简写语法导致的。R的运算符为左结合规则，原写法会被解析为(1 < x) < 2，不符合区间判断的逻辑，部分运行环境会直接抛出语法错误：

Error: no function to go from, jumping to a higher level

另外你提到测试x=0.001时需要返回"something"，和你写的1~2区间逻辑不符，可以根据实际需求调整判断阈值。

修正后的函数代码 #

如果你需要x在(1,2)区间时返回"something"，修正后的代码如下：

demo_function <- function(x){
  if(is.na(x)){
    return(NA)
  } else if(x > 1 & x < 2){
    return("something")
  } else {
    return("Nothing")
  }
}

如果你需要x=0.001也返回"something"，只需要调整判断条件即可，比如需要x在(0,2)区间返回的话，将条件改为x > 0 & x < 2即可。

注意事项 #

• R中做区间判断必须拆分为两个独立的比较表达式，用逻辑与运算符连接：单&支持向量化运算，可同时判断多个输入值；单值判断可以用&&短路运算符提升运行效率。
• 逻辑值TRUE在R中对应数值1，FALSE对应数值0，原错误写法的判断结果永远为TRUE，完全不符合区间判断的业务需求。

内容的提问来源于stack exchange，提问作者AlSub