OFFSET
1,2
LINKS
Vincenzo Librandi, Table of n, a(n) for n = 1..71
EXAMPLE
1, 23, 456, 7891, 01112, 131415, 1617181, 92021222, 3... becomes 1, 23, 456, 7891, 1112, 131415, 1617181, 92021222, ...
MATHEMATICA
d = Flatten[IntegerDigits /@ Range[90]]; Table[FromDigits[Take[d, {n(n + 1)/2 + 1, (n + 1)(n + 2)/2}]], {n, 0, 17}] (* Robert G. Wilson v, Nov 22 2004 *)
PROG
(PARI) N=[]; k=0; for(n=1, 20, while(#N<n, N=concat(N, Vec(Str(k++)))); print1(eval(concat(vecextract(N, 2^n-1)))", "); N=vecextract(N, Str("^.."n))) \\ M. F. Hasler, May 08 2014
CROSSREFS
KEYWORD
nonn,base
AUTHOR
Amarnath Murthy, Dec 16 2001
EXTENSIONS
More terms from Larry Reeves (larryr(AT)acm.org), Dec 18 2001
STATUS
approved