login
A065576
Numbers k such that the first k nonary digits found in decimal expansion of Pi form a prime.
1
1, 447, 562, 1686, 8444
OFFSET
1,2
COMMENTS
Any further terms are > 100000. - Lucas A. Brown, Oct 26 2024
MATHEMATICA
p = First[RealDigits[Pi, 10, 10^5]]; p = p[[ Select[ Range[10^5], p[[ # ]] != 9 & ]]]; Do[ If[ PrimeQ[ FromDigits[ Take[p, n], 9]], Print[n]], {n, 2250} ]
CROSSREFS
Sequence in context: A025346 A139230 A221506 * A200071 A203960 A147628
KEYWORD
base,nonn,hard,more,changed
AUTHOR
Robert G. Wilson v, Dec 01 2001
EXTENSIONS
a(5) from Lucas A. Brown, Oct 26 2024
STATUS
approved