A112445 Pseudoprimes (base 2) equal to the product of 7 primes not necessarily distinct.

370851481, 1310486905, 1452092005, 1553860945, 2719940041, 3328293745, 3860623585, 5394826801, 5612626041, 5659475185, 6295936465, 8857509661, 9234602385, 10780911505, 10975165201, 11718888181, 12254138065, 12416553721, 12452890681, 13577445505, 14795826661

Offset

1,1

Links

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

Example

a(1) = 370851481 = 7*11*13*17*19*31*37.

Mathematica

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

Crossrefs

Intersection of A046308 and A001567.

Sequence in context: A017471 A017603 A233804 * A101640 A233798 A230528

Adjacent sequences: A112442 A112443 A112444 * A112446 A112447 A112448

Keyword

easy,nonn

Author

Shyam Sunder Gupta, Dec 11 2005

Extensions

More terms from Amiram Eldar, Nov 10 2019

Status

approved