0,2

R. J. Mathar, Table of n, a(n) for n = 0..2000

A268234 := proc(n)

local r, c, a, k ;

a := 0;

r :=0;

c :=0;

for k from 0 to n do

a := a+A047999(r, c) ;

c := c+1 ;

if c > r then

c :=0 ;

r := r+1;

end if;

end do:

a;

end proc: # R. J. Mathar, May 06 2016

Cf. A047999. A268233 is a more informative version of the same data.

Sequence in context: A280471 A172266 A056847 * A253188 A320847 A105598

Adjacent sequences: A268231 A268232 A268233 * A268235 A268236 A268237

nonn

N. J. A. Sloane, Feb 03 2016

approved