OFFSET
0,1
MATHEMATICA
lim=104; A007376=Flatten[ IntegerDigits /@ Range[lim*8+3]]; Array[A007376[[8#+3]]&, lim+1, 0] (* James C. McMahon, Jan 05 2025 *)
CROSSREFS
KEYWORD
nonn,base
AUTHOR
N. J. A. Sloane, Jul 23 2008
STATUS
approved
