OFFSET
1,2
LINKS
Michael De Vlieger, Table of n, a(n) for n = 1..333
MATHEMATICA
Table[FromDigits@ Flatten@ Take[#, {n, n + (n - 1)}], {n, Ceiling[Length[#]/2]}] &@ Array[IntegerDigits, 23] (* Michael De Vlieger, May 13 2017 *)
CROSSREFS
KEYWORD
base,easy,nonn
AUTHOR
Amarnath Murthy, Nov 03 2002
EXTENSIONS
a(7) corrected by Michael De Vlieger, May 13 2017
STATUS
approved