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

38504389105, 79753114441, 86757431761, 95665544065, 101135235565, 160727267701, 184395152305, 232250619601, 241543943641, 267149008945, 281825521705, 298045705321, 306177962545, 360805362841, 432207073585, 435343749841, 473056144561, 503876371285, 518896999621

Offset: 1

Author

Shyam Sunder Gupta, Dec 11 2005

Keywords

• easy
• nonn

Examples

			a(1) = 38504389105 = 5*7*13*17*19*37*73*97.
		

Links

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

Crossrefs

Intersection of A046310 and A001567.

Programs

Mathematica

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

Extensions

More terms from Amiram Eldar, Nov 10 2019