Sum Of Array In R