A333128 Ending position of the first occurrence of n in the decimal expansion of Pi.

33, 2, 7, 1, 3, 5, 8, 14, 12, 6, 51, 96, 150, 112, 3, 5, 42, 97, 426, 39, 55, 95, 137, 18, 294, 91, 8, 30, 35, 188, 66, 2, 17, 26, 88, 11, 287, 48, 19, 45, 72, 4, 94, 25, 61, 62, 21, 121, 89, 59, 33, 50, 174, 10, 193, 132, 212, 406, 12, 6, 129, 221, 22, 314

Offset: 0

Author

Francesco Vissani, Apr 08 2020

Keywords

• nonn
• base

Comments

Variant of A032445, considering the position of the least-significant digit of n in the decimal expansion of Pi (A000796).

Crossrefs

Cf. A000796, A004216, A032445.

Programs

Mathematica

n = 1000;
intPi = Ceiling[N[Pi, n]*10^(n-1)];
piString = ToString[intPi];
Table[StringPosition[piString, ToString[n]][[1, 2]] , {n, 0, 70}]

Formula

a(n) = A032445(n) for n=0..9.

a(n) = 1 + A032445(n) for n = 10..99.

a(n) = A004216(n) + A032445(n).