OFFSET
2,1
PROG
(PARI) for(n=2, 20, k=10^n; while(ispseudoprime(k) || Mod(3, k)^(k-1)!=1, k--); print1(k, ", "))
CROSSREFS
KEYWORD
nonn,hard,base,more
AUTHOR
Felix Fröhlich, Jan 31 2015
STATUS
approved