R 强制参数缺失 - R_MissingArg

Question

有关于 R 内部缺少参数的信息:Missingness .
我很感兴趣是否有办法将函数的参数设置(覆盖)为 R_MissingArg在那个函数内？
的种类:

f <- function(x){
    if(!missing(x)) message("x non missing")
    make_missing(x)
    if(missing(x)) message("x missing")
    invisible()
}

我知道这可能不是推荐的方式，我可能应该使用 x <- NULL和 is.null(x)而不是检查缺失。

Answer 1

你可以用 substitute() 替换“x” :

var = substitute()
var
#Error: argument "var" is missing, with no default

而且，尽管使用 x = substitute() 更安全，您的 make_missing可能看起来像:

make_missing = function(x) assign(deparse(substitute(x)), 
                                  substitute(), 
                                  envir = parent.frame())

还有你的“f”:

f = function(x)
{
    if(missing(x)) message("missing") else message("not missing")

    make_missing(x)
    if(missing(x)) message("missing") else message("not missing")
}
f()
#missing
#missing
f(7)
#not missing
#missing