login
A020188
Pseudoprimes to base 60.
1
341, 427, 481, 671, 793, 841, 1729, 1891, 2257, 2821, 3133, 3277, 3599, 3601, 3661, 4577, 4777, 6001, 6161, 6533, 6601, 6943, 8911, 8917, 9937, 10249, 11521, 12331, 13333, 13481, 14701, 14981, 15841, 16897, 18889, 20591, 20801, 21361, 22321, 23479
OFFSET
1,1
COMMENTS
Composite numbers n such that 60^(n-1) == 1 (mod n). - Michel Lagneau, Feb 18 2012
MATHEMATICA
base = 60; t = {}; n = 1; While[Length[t] < 100, n++; If[! PrimeQ[n] && PowerMod[base, n-1, n] == 1, AppendTo[t, n]]]; t (* T. D. Noe, Feb 21 2012 *)
CROSSREFS
Cf. A001567 (pseudoprimes to base 2).
Sequence in context: A025335 A025327 A101852 * A025353 A025345 A337715
KEYWORD
nonn
STATUS
approved