[go: up one dir, main page]

login
A020202
Pseudoprimes to base 74.
1
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
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
KEYWORD
nonn
STATUS
approved