A112443 Pseudoprimes (base-2) equal to the product of 5 primes not necessarily distinct.

825265, 1050985, 1275681, 2113665, 2503501, 2615977, 2882265, 3370641, 3755521, 4670029, 4698001, 4895065, 5034601, 6242685, 6973057, 7428421, 8322945, 9223401, 9224391, 9890881, 10877581, 12067705, 12945745, 13757653, 13823601, 13992265, 16778881, 17698241, 18007345

Offset

1,1

Links

Amiram Eldar, Table of n, a(n) for n = 1..10000

Example

a(1) = 825265 = 5*7*17*19*73.

Mathematica

s={}; Do[If[PrimeOmega[n] == 5 && PowerMod[2, n - 1, n] == 1, AppendTo[s, n]], {n, 1, 10^7}]; s (* Amiram Eldar, Nov 10 2019 *)

Crossrefs

Intersection of A014614 and A001567.

Sequence in context: A017359 A017479 A017611 * A112428 A182532 A293291

Adjacent sequences: A112440 A112441 A112442 * A112444 A112445 A112446

Keyword

easy,nonn

Author

Shyam Sunder Gupta, Dec 11 2005

Extensions

More terms from Amiram Eldar, Nov 10 2019

Status

approved