|
| |
|
|
A066699
|
|
Numbers n such that binomial(2n,n)+1 is prime.
|
|
13
| |
|
|
1, 2, 4, 7, 12, 19, 22, 38, 46, 62, 68, 72, 84, 166, 184, 214, 340, 348, 445, 517, 692, 817, 1316, 1381, 2554, 2713, 5261, 6209, 6735, 7920, 8207, 8772, 9530, 13075, 13302, 13405, 15002, 16371, 19346
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 1,2
|
|
|
REFERENCES
| Aigner and Ziegler. Proofs from the Book, 2nd edition. Springer-Verlag, 2001.
|
|
|
EXAMPLE
| C(4,2) + 1 = 7, a prime; so 2 is a term of the sequence.
|
|
|
MAPLE
| Do[If[PrimeQ[Binomial[2 a, a]+1], a >>>"C:\prime.txt"], {a, 1, 20000}] (from Ed Pegg)
|
|
|
MATHEMATICA
| Select[Range[1, 5 * 10^2], PrimeQ[Binomial[2* #, # ] + 1] &]
|
|
|
CROSSREFS
| Cf. A085793, A066726.
Sequence in context: A035296 A105807 A192521 * A188425 A087149 A090853
Adjacent sequences: A066696 A066697 A066698 * A066700 A066701 A066702
|
|
|
KEYWORD
| nonn
|
|
|
AUTHOR
| Joseph L. Pe (joseph_l_pe(AT)hotmail.com), Jan 14 2002
|
|
|
EXTENSIONS
| More terms (not certified primes) from Jason Earls (zevi_35711(AT)yahoo.com) and Robert G. Wilson v (rgwv(AT)rgwv.com), Jan 15 2002
More terms from Ed Pegg Jr (ed(AT)mathpuzzle.com), Sep 10 2003
|
| |
|
|
