A104825 Primes from merging of 5 successive digits in decimal expansion of Pi.

14159, 35897, 58979, 38327, 97169, 71693, 39937, 9749, 30781, 20899, 34211, 64709, 47093, 82231, 84811, 46229, 81097, 56659, 66593, 86783, 85669, 66923, 34603, 93607, 60631, 9209, 25409, 54091, 25903, 113, 33053, 65213, 13841, 51941, 94151

Offset: 1

Author

Zak Seidov, Mar 27 2005

Keywords

• nonn
• base

Comments

Because leading zeros are permitted, some terms have fewer than 5 digits. - Harvey P. Dale, Mar 01 2023

Links

• Harvey P. Dale, Table of n, a(n) for n = 1..1000

Crossrefs

Cf. A104819 - A104842.

Programs

Mathematica

With[{pi=FromDigits/@Partition[RealDigits[Pi,10,2000][[1]],5,1]}, Select[pi,PrimeQ]] (* Harvey P. Dale, Oct 18 2011 *)