|
| |
|
|
A084730
|
|
Smallest prime of the form k*n! - 1.
|
|
1
| |
|
|
2, 3, 5, 23, 239, 719, 5039, 201599, 1088639, 14515199, 159667199, 479001599, 31135103999, 87178291199, 2615348735999, 188305108991999, 711374856191999, 192071211171839999, 3649353012264959999, 12164510040883199999
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 2,1
|
|
|
EXAMPLE
| a(8) = 161599 = 4*8! - 1 is a prime.
|
|
|
MATHEMATICA
| Do[k = 1; While[ !PrimeQ[k*n! - 1], k++ ]; Print[k*n! - 1], {n, 2, 20}]
|
|
|
PROG
| (PARI) a(n)=if(n<1, 0, k=1; while(isprime(k*n!-1)==0, k++); k*n!-1)
|
|
|
CROSSREFS
| Cf. A083663.
Sequence in context: A138655 A053708 A137070 * A117696 A181730 A024774
Adjacent sequences: A084727 A084728 A084729 * A084731 A084732 A084733
|
|
|
KEYWORD
| nonn
|
|
|
AUTHOR
| Amarnath Murthy and Meenakshi Srikanth (amarnath_murthy(AT)yahoo.com), Jun 13 2003
|
|
|
EXTENSIONS
| Corrected and extended by Benoit Cloitre (benoit7848c(AT)orange.fr), Jun 14 2003
|
| |
|
|
