A120584 Distance between n-1 and n in decimal expansion of Pi A000796.

33, 5, 16, 11, 6, 20, 8, 1, 2, 21, 41, 11, 46, 61, 14, 19, 82, 32, 18, 49, 105, 50, 11, 37, 105, 19, 19, 136, 113, 34, 234, 77, 66, 166, 1, 51, 109, 98, 42, 19, 20, 154, 49, 26, 25, 44, 111, 93, 46, 40, 265, 77, 69, 182, 421, 286, 154, 9, 3, 24, 64, 22, 61, 69, 85, 21, 28

Offset: 0

Author

Zak Seidov, Aug 17 2006

Keywords

• base
• nonn

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.

Crossrefs

Cf. A000796.

Programs

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]]