A065840 Numbers n such that the first n quaternary digits found in the base-10 expansion of Pi form a prime (when the decimal point is ignored).
1, 2, 3, 5, 10, 19, 72, 115, 220, 315, 375, 12408
Offset: 1
Examples
E.g., the first a(5) or 10 quaternary digits of Pi are 31.12332323{4} and 3112332323{4} is the prime 880571{10}.
Crossrefs
Programs
-
Mathematica
p = First[ RealDigits[ Pi, 10, 10^5]]; p = p[[ Select[ Range[10^5], p[[ # ]] == 0 || p[[ # ]] == 1 || p[[ # ]] == 2 || p[[ # ]] == 3 & ]]]; Do[ If[ PrimeQ[ FromDigits[ Take[p, n], 4]], Print[ n]], {n, 1, 4000} ]
Extensions
a(12) from Chai Wah Wu, Apr 07 2020
Comments