A367826 Antidiagonal sums of A367824.

1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, -9, 3, 30, 57, 27, 126, 196, 130, 333, 172, 186, -28, 319, 169, 262, 317, 293, 297, 568, 252, 525, 417, -114, 455, 309, 308, 612, 566, 543, 409, 652, 325, 627, -64, 268, 552, 685, 426, 702, 534, 517, 485, 646, 399, -295, 497, 486, 640, 733, 440

Offset: 0

Author

Stefano Spezia, Dec 02 2023

Keywords

• sign
• base
• look

Links

• Stefano Spezia, Table of n, a(n) for n = 0..10000

Crossrefs

Cf. A004086, A367824.

Programs

Mathematica

A367824[0,0]=1; A367824[n_,k_]:=Numerator[(FromDigits[Reverse[IntegerDigits[n]]]-k)/(n+k)]; Table[Sum[A367824[n-k,k],{k,0,n}],{n,0,60}]