A020192 Pseudoprimes to base 64.

9, 15, 21, 35, 39, 45, 63, 65, 85, 91, 105, 117, 133, 153, 195, 221, 231, 247, 259, 273, 315, 341, 357, 435, 451, 455, 481, 511, 561, 585, 645, 651, 671, 703, 763, 765, 819, 861, 873, 949, 1001, 1035, 1105, 1205, 1247, 1271, 1281, 1365, 1387, 1417, 1541, 1581

Offset

1,1

Comments

Composite numbers n such that 64^(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 = 64; 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: A096788 A050991 A033553 * A241809 A063174 A338082

Adjacent sequences: A020189 A020190 A020191 * A020193 A020194 A020195

Keyword

nonn

Author

David W. Wilson

Status

approved