我有一个函数f，它有两个参数(p1和p2):
如果参数p2未向函数传递任何值，则应使用p1^2的值.但是，我如何在函数中发现，是否给定了值.问题是，如果没有值，变量p2就不会初始化.因此，我无法测试p2分为NULL分.
f <- function(p1, p2) {
if(is.null(p2)) {
p2=p1^2
}
p1-p2
}
是否有可能判断p2的值是否传递给函数？(我找不到isset()函数或类似的东西.)
你可以用missing()这个函数.
f <- function(p1, p2) {
if(missing(p2)) {
p2=p1^2
}
p1-p2
}
或者，您可以在默认情况下将p2的值设置为NULL.我有时更喜欢这种解决方案，因为它允许将参数传递给嵌套函数.
f <- function(p1, p2=NULL) {
if(is.null(p2)) {
p2=p1^2
}
p1-p2
}
f.wrapper <-function(p1,p2=NULL){
p1 <- 2*p1
f(p1,p2)
}
> f.wrapper(1)
[1] -2
> f.wrapper(1,3)
[1] -1
编辑:从技术上讲，你也可以用missing()来做这件事，但是你也必须在f.wrapper中包含missing()语句.