login
A020216
Pseudoprimes to base 88.
1
87, 91, 133, 145, 217, 247, 267, 403, 445, 481, 589, 645, 1105, 1247, 1729, 1885, 1891, 2047, 2465, 2581, 2611, 2821, 3165, 3565, 4123, 4331, 4849, 4921, 5365, 5551, 5785, 6119, 6601, 6697, 7087, 7657, 7743, 7745, 8029, 8911, 9073, 10585, 11481, 11563
OFFSET
1,1
COMMENTS
Composite numbers n such that 88^(n-1) == 1 (mod n). - Michel Lagneau, Feb 18 2012
MATHEMATICA
base = 88; 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: A143767 A033407 A248026 * A045125 A295698 A095597
KEYWORD
nonn
STATUS
approved