A034004 Successive decimal digits of triangular numbers.

0, 1, 3, 6, 1, 0, 1, 5, 2, 1, 2, 8, 3, 6, 4, 5, 5, 5, 6, 6, 7, 8, 9, 1, 1, 0, 5, 1, 2, 0, 1, 3, 6, 1, 5, 3, 1, 7, 1, 1, 9, 0, 2, 1, 0, 2, 3, 1, 2, 5, 3, 2, 7, 6, 3, 0, 0, 3, 2, 5, 3, 5, 1, 3, 7, 8, 4, 0, 6, 4, 3, 5, 4, 6, 5, 4, 9, 6, 5, 2, 8, 5, 6, 1, 5, 9, 5, 6, 3, 0, 6, 6, 6, 7, 0, 3, 7, 4, 1

Offset: 1

Author

N. J. A. Sloane

Keywords

• nonn
• base
• easy

References

• Jason Rogers and Jason Earls, 0.1361015212836455566789110512013615..., A Split Novel, Lulu Press, NY, 2006, p. 84.

Links

• Michel Marcus, Table of n, a(n) for n = 1..5355

Crossrefs

Cf. A000217.

Programs

Mathematica

Flatten[ IntegerDigits /@ Accumulate@ Range[0, 38]] (* Robert G. Wilson v, Mar 15 2012 *)

PARI

print1(0, ", "); for(n=1,9,d=digits(n*(n+1)/2);for(i=1,#d,print1(d[i]", "))) \\ Charles R Greathouse IV, Feb 07 2013