Amiram Eldar, <a href="/A153581/b153581_1.txt">Table of n, a(n) for n = 1..1077</a> (terms 1..125 from Robert G. Wilson v)
Amiram Eldar, <a href="/A153581/b153581_1.txt">Table of n, a(n) for n = 1..1077</a> (terms 1..125 from Robert G. Wilson v)
proposed
approved
editing
proposed
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 *)
proposed
editing
editing
proposed
Amiram Eldar, <a href="/A153581/b153581_1.txt">Table of n, a(n) for n = 1..1077</a> (terms 1..125 from Robert G. Wilson v)
Robert G. Wilson v, Amiram Eldar, <a href="/A153581/b153581_1.txt">Table of n, a(n) for n = 1..1251077</a>
approved
editing
proposed
approved
editing
proposed
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
approved
editing