|
| |
|
|
A178488
|
|
Numbers n such that 8*n!+1 is a prime.
|
|
0
|
|
|
|
2, 4, 9, 10, 11, 12, 15, 25, 31, 46, 53, 78, 318, 615, 955
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
|
OFFSET
|
1,1
|
|
|
LINKS
|
Table of n, a(n) for n=1..15.
Index entries for sequences related to numbers of primes of the form k*n!+-1
|
|
|
MATHEMATICA
|
fQ[n_] := PrimeQ[8 n! + 1]; k = 0; lst = {}; While[k < 1501, If[ fQ@k, AppendTo[lst, k]; Print@k]; k++ ]; lst
|
|
|
PROG
|
(PARI) for( N=1, 999, ispseudoprime(8*n!+1) & print1(n", "))
|
|
|
CROSSREFS
|
Cf. A076680, A051915, A014545.
Sequence in context: A111422 A076661 A072583 * A047465 A002258 A191766
Adjacent sequences: A178485 A178486 A178487 * A178489 A178490 A178491
|
|
|
KEYWORD
|
nonn,hard,more
|
|
|
AUTHOR
|
Robert G. Wilson v, Sep 13 2010 and M. F. Hasler, Sep 16 2010
|
|
|
STATUS
|
approved
|
| |
|
|
