freduce(1:5, `+`) # => 15
freduce(letters[1:4], paste0) # => "abcd"
freduce(list(1, 2, 3), `*`) # => 6
freduce(1:3, `+`, .init = 10) # => 16
freduce(1:3, paste0, .right = TRUE) # => "321"
freduce(1:4, `+`, .accumulate = TRUE) # => c(1, 3, 6, 10)
Run the code above in your browser using DataLab