1,1

Table of n, a(n) for n=1..20.

Index entries for sequences related to numbers of primes of the form k*n!+-1

fQ[n_] := PrimeQ[9 n! - 1]; k = 0; lst = {}; While[k < 1501, If[ fQ@k, AppendTo[lst, k]; Print@k]; k++ ]; lst

Sequence in context: A015756 A163906 A302844 * A173079 A173903 A154785

Adjacent sequences: A180627 A180628 A180629 * A180631 A180632 A180633

nonn

Robert G. Wilson v, Sep 13 2010

approved