document.write('
Data hosted with ♥ by Pastebin.com - Download Raw - See Original
  1. #currying
  2. library(functional)
  3. add <- function(a, b) a + b
  4. add3 <- Curry(add, a = 3)
  5. add5 <- Curry(add, a = 5)
  6.  
  7. add3(add5(1))
');