|
| |
|
|
A103511
|
|
Smallest prime > double factorial number A001147(n).
|
|
1
| |
|
|
2, 5, 17, 107, 947, 10399, 135151, 2027033, 34459429, 654729139, 13749310577, 316234143227, 7905853580633, 213458046676877, 6190283353629379, 191898783962510743, 6332659870762850657, 221643095476699771957
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 1,1
|
|
|
COMMENTS
| The Mathematica program ignores the first term.
|
|
|
EXAMPLE
| 1!!=1, 2 is the first prime greater than 1;
6!!=10395, 10399 is the first prime greater than 10395.
|
|
|
MATHEMATICA
| nmax = 2^2048; npd = 1; n = 2; npd = npd*(2*n - 1); While[npd < nmax, cp = npd + 2; While[ ! (PrimeQ[cp]), cp = cp + 2]; Print[cp]; n = n + 1; npd = npd*(2*n - 1)]
|
|
|
CROSSREFS
| Cf. A001147.
Sequence in context: A203006 A143878 A081546 * A161609 A174168 A097980
Adjacent sequences: A103508 A103509 A103510 * A103512 A103513 A103514
|
|
|
KEYWORD
| nonn
|
|
|
AUTHOR
| Lei Zhou (lzhou5(AT)emory.edu), Feb 15 2005
|
| |
|
|
