如何修改，谢谢！

aaa<-function(yvar,xvar){
  if (!is.null(yvar) && !is.null(xvar)) {
    print("aaaaaaaaaaaaa")
  } else {
    print("bbbbbbbbbbbbb")
  }
}
aaa(yvar="a",xvar="b")
结果显示aaaaaaaaaaaaa
aaa() # yvar和xvar不指定
结果显示bbbbbbbbbbbbb

但 aaa() 出错啦！

首先，你确定你的aaa这个function环境下输入‘aaa()’得到'bbbbbbbbbbbb'？
其次，按照你的意思，不指定（即为NULL值）可以得到“bbbbbbbbbbb”，那么你的function定义时需要修改一下，如下：

1. aaa<-function(yvar=NULL,xvar=NULL){
   
2.    if(!is.null(yvar)&&!is.null(xvar)){
   
3.       print('aaaaa')
   
4.     }else{
   
5.       print('bbbbb')
   
6.     }
   
7. }

复制代码

这个应该可以

aaa<-function(yvar,xvar){
  call <- match.call()
  if (!is.null(call$yvar) && !is.null(call$xvar)) {
    print("aaaaaaaaaaaaa")
  } else {
    print("bbbbbbbbbbbbb")
  }
}