OFFSET
1,1
COMMENTS
PROG
(PARI) a034693(n) = my(s=1); while(!isprime(s*n+1), s++); s;
isok(n) = a034693(n) == 3;
lista(nn) = {for (n=1, nn, if (isok(n), print1(3*n+1, ", ")); ); } \\ Michel Marcus, May 13 2018
CROSSREFS
KEYWORD
nonn
AUTHOR
EXTENSIONS
Corrected (wrong term 769 removed) and extended by Michel Marcus, May 13 2018
STATUS
approved