A130807 Prime p > a(n-1) such that p + n! is prime, starting with a(1) = 2.
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
Crossrefs
See A105049 for another version.
Programs
-
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
Extensions
Edited and extended by T. D. Noe, Aug 23 2007
Name clarified by Michel Marcus, Mar 15 2023