OFFSET
1,1
PROG
(PARI) forprime(n=1, 1000, if(sum(k=n, 2*n, if(((n-1)!-1)%k, 0, 1))>0, print1(n, ", ")))
CROSSREFS
KEYWORD
nonn
AUTHOR
Benoit Cloitre, Aug 14 2003
EXTENSIONS
More terms from Ray Chandler, Aug 16 2003
STATUS
approved