OFFSET
1,1
LINKS
Harvey P. Dale, Table of n, a(n) for n = 1..1000
EXAMPLE
2415 is a term with 2+4 = 1+5.
MATHEMATICA
dsQ[n_]:=Module[{idn=IntegerDigits[n], len=IntegerLength[n]/2}, Total[Take[ idn, len]] ==Total[ Take[idn, -len]]]; Select[Flatten[ Table[Table[(n(n+1))/2, {n, Ceiling[(Sqrt[8 10^i+1]-1)/2], Floor[ (Sqrt[8 10^(i+1)+1]-1)/2]}], {i, 1, 5, 2}]], dsQ] (* Harvey P. Dale, Sep 29 2011 *)
CROSSREFS
KEYWORD
easy,nonn,base
AUTHOR
Amarnath Murthy, Mar 21 2002
EXTENSIONS
Corrected and extended by Harvey P. Dale, Sep 29 2011
Offset changed by Andrew Howroyd, Sep 21 2024
STATUS
approved