R - 如何结束功能并返回NA?

use*_*837 2 r function

对不起,这似乎是一个非常简单的问题,但我无法弄清楚.我在函数中间有一小段代码:

if(num > length(unique_state)) stop(NA,call. = F) 
Run Code Online (Sandbox Code Playgroud)

我想要的是如果IF STATEMENT的结果为TRUE,那么只需停止该功能并重新运行NA给用户.但是,使用上面的代码我也收到一条消息:

Error: NA
Run Code Online (Sandbox Code Playgroud)

如何结束函数并返回NA?

Set*_*eth 6

你试过return()吗?

f=function(x) {

  for(i in 1:100){
    x=x+i
    ##interesting part here
    if(x>44) return(NA)
  }
  x     }
Run Code Online (Sandbox Code Playgroud)