more Sum of integers

R