大家好！我遇到一个问题，编写一个函数，比如：
myfun <- function(x){
    if( length( x[!is.na(x)] )  !=  length(x) ){
        stop("x中有NA！")}
    2*x
}

y <- c(1, 2, NA, 4)
myfun(y)

运行结果显示为“x中有NA！”， 而不是“y中有NA!”，
即运行结果需要根据myfun输入对象名称而输出相应变量名称，如何解决？