中断R中的函数而不是循环

Question

好的，所以我正在编写一个更大的函数来调用几个函数。

问题是我需要在某些逻辑条件下突破“function_inner”而不突破“function_outer”。Break 似乎适用于循环，然后停止，它停止所有功能......有什么想法吗？

function_outer <- function(){

    beta =1
        function_inner <- function(beta){
        if (beta==1){?break?stop}
        print("Its not working")
         }
    return(beta)
}

Answer 1

你的意思是return一个值？

function_outer <- function(){

  beta =1
  function_inner <- function(beta){
    if (beta==1){ return("Inner beta is 1") }
    print("Its not working")
     }
  return(beta)
}