OFFSET
0,1
COMMENTS
a(0)=33 because position of first zero is 33; after this zero, "1" is at position 5, hence a(1)=5; after this 1, "2" is at position 16, hence a(2)=16; after this 2, "3" is at position 11, hence a(3)=11 etc.
MATHEMATICA
ts=ToString[FromDigits[RealDigits[N[Pi, 20000]][[1]]]]; Reap[Do[sp=StringPosition[ts, ToString[n]][[1, 1]]; Sow[sp]; ts=StringDrop[ts, sp], {n, 0, 100}]][[2, 1]]
CROSSREFS
KEYWORD
base,nonn
AUTHOR
Zak Seidov, Aug 17 2006
STATUS
approved