login
A130807
Prime p > a(n-1) such that p + n! is prime, starting with a(1) = 2.
1
2, 3, 5, 7, 11, 13, 19, 23, 31, 41, 59, 83, 109, 127, 149, 163, 167, 173, 241, 271, 317, 397, 401, 461, 463, 577, 607, 653, 683, 739, 797, 857, 883, 887, 941, 1093, 1327, 1601, 1949, 2281, 2383, 2593, 2647, 2753, 2953, 3067, 3089, 3469, 3533, 3709
OFFSET
1,1
PROG
(PARI) lista(nn) = my(va=vector(nn)); va[1] = 2; for (n=2, nn, my(p=nextprime(va[n-1]+1)); while (!ispseudoprime(p+n!), p = nextprime(p+1)); va[n] = p; ); va; \\ Michel Marcus, Mar 15 2023
CROSSREFS
See A105049 for another version.
Sequence in context: A215642 A092581 A362527 * A338577 A030145 A285983
KEYWORD
easy,nonn
AUTHOR
Giovanni Teofilatto, Aug 20 2007
EXTENSIONS
Edited and extended by T. D. Noe, Aug 23 2007
Name clarified by Michel Marcus, Mar 15 2023
STATUS
approved