R语言函数未传必要参数却用于向量取子集为何不报错？

首先得澄清一个关键点：如果你的工作环境里没有定义过b这个变量，直接运行f2 <- function(a,b) {a[b]}; f2(a=rep(1, 2))是一定会报错的，错误信息会是：Error in a[b] : argument "b" is missing, with no default。那你遇到的没报错的情况，大概率是下面的原因：

• 你的环境里已经存在b变量：
  R的变量查找遵循作用域链规则——当函数内部引用一个变量时，会先在函数的局部环境（形式参数和函数内定义的变量）里找，如果找不到，就会往上到父环境（比如全局环境）里找。
  你定义的f2里有形式参数b，但调用时没传值，所以局部环境里的b是未赋值状态。这时候如果你的全局环境里刚好有个叫b的变量（比如之前运行过b <- 1或者b <- c(1,2)），R就会用全局的b来完成a[b]的索引操作，自然不会报错。

• 你提到的惰性求值在这里其实不背锅：
  你举的f <- function(x) {10}; f(stop("This is an error!"))不报错，是因为x在函数里完全没被用到，惰性求值机制根本不会去计算stop("error")的值。但f2里的b是被实际用到的（a[b]必须求值b才能完成索引），所以如果b既没传值、父环境里也找不到，一定会触发报错——这和你后面举的force(x)或者直接用x的报错逻辑是一致的：只要参数被实际求值了，缺失的话就会报错。

总结一下：你遇到的没报错情况，本质是R的作用域查找找到了父环境里的b，而不是惰性求值让b被跳过了。如果在干净的环境里测试，这个调用肯定会报错的。

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