OFFSET
1,1
COMMENTS
EXAMPLE
For n=6, 2*3*5*7*11*13/2 + 2 = 30030/2 + 2 = 15017 is prime, while 30031 is not prime, so a(6) = 15017.
PROG
(PARI) a(n) = my(Primo=vecprod(primes(n))); for(D=1, Primo, if(Primo%D==0 && ispseudoprime(Primo/D+D), return(Primo/D+D)));
CROSSREFS
KEYWORD
nonn
AUTHOR
Alain Rocchelli, Apr 01 2026
STATUS
approved
