|
Search: id:A005042
|
|
|
| A005042 |
|
Primes formed by the initial digits of the decimal expansion of Pi. (Formerly M3129)
|
|
+0 11
|
|
| 3, 31, 314159, 31415926535897932384626433832795028841
(list; graph; listen)
|
|
|
OFFSET
|
1,1
|
|
|
COMMENT
|
Michael Kleber (kleber(AT)brandeis.edu) observes that a naive probabilistic argument suggests that the sequence is infinite. Jun 23 2004.
|
|
REFERENCES
|
M. Gardner, personal communication.
|
|
LINKS
|
Ed T. Prothro, How I Found the Next Pi Prime
Eric Weisstein's World of Mathematics, Pi-Prime
|
|
MAPLE
|
Digits := 130; n0 := evalf(Pi); for i from 1 to 120 do t1 := trunc(10^i*n0); if isprime(t1) then print(t1); fi; od:
|
|
MATHEMATICA
|
a = {}; Do[k = Floor[Pi 10^n]; If[PrimeQ[k], AppendTo[a, k]], {n, 0, 160}]; a (*Artur Jasinski*) - Artur Jasinski (grafix(AT)csl.pl), Mar 26 2008
|
|
CROSSREFS
|
Cf. A060421.
Sequence in context: A129209 A134721 A002707 this_sequence A136582 A119937 A114257
Adjacent sequences: A005039 A005040 A005041 this_sequence A005043 A005044 A005045
|
|
KEYWORD
|
nonn,base
|
|
AUTHOR
|
njas
|
|
EXTENSIONS
|
The next term consists of the first 16208 digits of Pi. Ed T. Prothro found this probable prime in 2001.
Bob Baillie (rjbaillie(AT)frii.com) has checked up through 40000 digits. There are no other numbers in this sequence for which Mathematica's PrimeQ[ ] is TRUE. Jun 23, 2004.
|
|
|
Search completed in 0.002 seconds
|