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

45593065, 68800501, 81722145, 110851741, 192112921, 226018585, 238018341, 250385401, 265729465, 272479285, 321197185, 329379505, 332633665, 353987481, 357339745, 358466361, 413631505, 415702105, 416392005, 417241045, 421121701, 464790781, 476177905, 483532105

Offset: 1

Author

Shyam Sunder Gupta, Dec 11 2005

Keywords

• easy
• nonn

Examples

			a(1) = 45593065 = 5*7*17*19*37*109.
		

Links

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

Crossrefs

Intersection of A046306 and A001567.

Programs

Mathematica

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

Extensions

More terms from Amiram Eldar, Nov 10 2019