fork download
  1. a <- function(){ x=1; y=2; z=x+y }
  2. { function(){ x=1; y=2; z=x+y } } -> b
  3. a
  4. (a()) # (x) need to print a result
  5. b
  6. (b())
  7.  
Success #stdin #stdout 0.44s 22824KB
stdin
Standard input is empty
stdout
function () 
{
    x = 1
    y = 2
    z = x + y
}
[1] 3
function () 
{
    x = 1
    y = 2
    z = x + y
}
[1] 3