A020223 Pseudoprimes to base 95.

91, 94, 141, 341, 561, 658, 671, 742, 1111, 1551, 1603, 1891, 1921, 2806, 2821, 2977, 3131, 3367, 3421, 3601, 4089, 4371, 4741, 5461, 5551, 6161, 6533, 6601, 6721, 7107, 8249, 8601, 9121, 9641, 10011, 11041, 13361, 14241, 15841, 16939, 17907, 18019

Offset

1,1

Comments

Composite numbers n such that 95^(n-1) == 1 (mod n).

Links

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

Index entries for sequences related to pseudoprimes

Mathematica

base = 95; 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: A351624 A020318 A126134 * A288453 A344801 A184034

Adjacent sequences: A020220 A020221 A020222 * A020224 A020225 A020226

Keyword

nonn

Author

David W. Wilson

Status

approved