A020164 Pseudoprimes to base 36.

35, 91, 185, 217, 259, 301, 403, 481, 559, 679, 703, 1105, 1111, 1147, 1261, 1295, 1333, 1387, 1591, 1729, 1891, 2465, 2651, 2701, 2821, 3007, 3145, 3367, 3421, 3565, 3589, 3913, 4123, 4141, 4171, 4495, 5551, 5611, 5713, 6001, 6485, 6533, 6601, 6643, 7471

Offset

1,1

Comments

Composite numbers n such that 36^(n-1) == 1 (mod n). - Michel Lagneau, Feb 18 2012

Links

T. D. Noe, Table of n, a(n) for n = 1..1000

Index entries for sequences related to pseudoprimes

Mathematica

base = 36; 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: A182755 A300554 A020295 * A146206 A350196 A259978

Adjacent sequences: A020161 A020162 A020163 * A020165 A020166 A020167

Keyword

nonn

Author

David W. Wilson

Status

approved