J-Moravec · March 24, 2024 20:14
diff --git a/gistfile1.txt b/gistfile1.txt
 count_to = function(x = 5){
  current = 0
  
  function(){
    if(i >= x)
      return(NULL)
    i <<- i+1
    i
  }
 }

 count = count_to(3)
 count() # 1
 count() # 2
 count() # 3
 count() # NULL
	count_to = function(x = 5){
	current = 0

	function(){
	if(i >= x)
	return(NULL)
	i <<- i+1
	i
	}
	}

	count = count_to(3)
	count() # 1
	count() # 2
	count() # 3
	count() # NULL