add <- function(x, y, z) {
  x+y+z
}

add

add(1,2,3)

sub <- function(x,y) {
  z <- 7
  return(x-y)
}

sub(5,3)

z

add <- sum

add(1:4)

sub(y=4, x=8)

mult <- function(x, y=5) {
  x * y
}

mult(2, 3)

mult(2)

mult()