OFFSET
1,1
COMMENTS
The next term is too large to include.
MAPLE
select(isprime, [seq(factorial(2*k)+factorial(k)+1, k=0..600)]); # Muniru A Asiru, May 27 2018
PROG
(PARI) lista(nn) = {for(k=0, nn, if(ispseudoprime(p=(2*k)!+k!+1), print1(p, ", "))); } \\ Altug Alkan, Mar 22 2018
CROSSREFS
KEYWORD
nonn
AUTHOR
Seiichi Manyama, Mar 22 2018
STATUS
approved