[go: up one dir, main page]

login
A020224
Pseudoprimes to base 96.
1
65, 95, 133, 469, 485, 679, 781, 973, 1105, 1261, 1273, 1649, 1729, 1843, 2465, 2641, 2665, 2701, 2821, 3545, 3977, 4187, 4577, 5617, 6097, 6305, 6499, 6601, 8905, 8911, 9121, 9215, 9217, 9313, 10585, 11155, 11881, 12649, 12901, 13289, 13333, 13483
OFFSET
1,1
COMMENTS
Composite numbers n such that 96^(n-1) == 1 (mod n). - Michel Lagneau, Feb 18 2012
MATHEMATICA
base = 96; 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: A283656 A020194 A094447 * A063519 A299456 A300094
KEYWORD
nonn
STATUS
approved