A034004 - OEIS

%I #19 Dec 15 2017 17:41:09

%S 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,

%T 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,

%U 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

%N Successive decimal digits of triangular numbers.

%D Jason Rogers and _Jason Earls_, 0.1361015212836455566789110512013615..., A Split Novel, Lulu Press, NY, 2006, p. 84.

%H Michel Marcus, <a href="/A034004/b034004.txt">Table of n, a(n) for n = 1..5355</a>

%t Flatten[ IntegerDigits /@ Accumulate@ Range[0, 38]] (* _Robert G. Wilson v_, Mar 15 2012 *)

%o (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

%Y Cf. A000217.

%K nonn,base,easy

%O 1,3

%A _N. J. A. Sloane_.