A020202 Pseudoprimes to base 74.

15, 25, 75, 91, 175, 219, 325, 365, 427, 435, 511, 561, 793, 949, 1095, 1105, 1387, 1525, 1729, 1825, 1891, 2275, 2465, 2821, 4453, 4577, 4795, 5185, 5475, 5551, 6175, 6533, 6541, 6601, 6643, 7421, 7613, 8911, 10585, 10675, 11041, 12607, 12775, 12871, 13019

Offset

1,1

Comments

Composite numbers n such that 74^(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 = 74; 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: A354959 A280406 A020302 * A020300 A032587 A336689

Adjacent sequences: A020199 A020200 A020201 * A020203 A020204 A020205

Keyword

nonn

Author

David W. Wilson

Status

approved