Reduce Function In R