login
A185591
Primes in continued fraction expansion of Pi (A001203).
2
3, 7, 2, 3, 2, 2, 2, 2, 2, 2, 3, 13, 2, 2, 2, 3, 5, 7, 2, 3, 7, 2, 3, 2, 5, 2, 2, 3, 2, 2, 2, 2, 2, 3, 2, 2, 5, 2, 2, 5, 2, 2, 2, 2, 7, 3, 3, 7, 2, 7, 2, 3, 19, 2, 3, 7, 3, 3, 3, 2, 2, 2, 13, 2, 3, 3, 3, 2, 5, 3, 2, 2, 3, 23, 3, 7, 2, 2, 2, 127, 5, 3, 13, 7, 5, 3, 29, 3, 2, 2, 3, 3, 3, 3, 2, 7, 2, 11, 3, 7, 5, 2, 3, 2, 3, 2, 2, 2
OFFSET
1,1
LINKS
MAPLE
Digits := 600: p1 := convert(Pi, confrac, 300): select(isprime, p1);
MATHEMATICA
Select[ContinuedFraction[Pi, 500], PrimeQ] (* Harvey P. Dale, Jan 22 2012 *)
CROSSREFS
Cf. A185809.
Sequence in context: A182502 A059818 A374829 * A023525 A090688 A334959
KEYWORD
nonn
AUTHOR
Jani Melik, Feb 04 2011
STATUS
approved