OFFSET
1,1
COMMENTS
Terms congruent to 5 (mod 6): 468950021, 493108481, 659846021, 5936122901, 8144063621, ... - Robert G. Wilson v, Sep 03 2014
Terms not congruent to 1 (mod 12): 468950021, 493108481, 643767931, 659846021, 773131927, 5779230451, 5936122901, 7294056727, 8144063621, 9671001451, ... - Robert G. Wilson v, Sep 03 2014
LINKS
Amiram Eldar, Table of n, a(n) for n = 1..1077 (terms 1..125 from Robert G. Wilson v)
MATHEMATICA
fQ[n_] := ! PrimeQ[n] && PowerMod[2, n - 1, n] == 1 && PowerMod[3, n - 1, n] == 1 && PowerMod[5, n - 1, n] == 1 && PowerMod[7, n - 1, n] == 1 && Mod[n, CarmichaelLambda[n]] != 1; Select[ Range[ 365000000], fQ] (* Ray Chandler, Dec 28 2008; corrected by Robert G. Wilson v, Sep 01 2014 *)
CROSSREFS
KEYWORD
nonn
AUTHOR
Ray Chandler & Artur Jasinski, Dec 28 2008
EXTENSIONS
Terms a(8) and onward from Robert G. Wilson v, Sep 01 2014
STATUS
approved