The OEIS is supported by the many generous donors to the OEIS Foundation.
%I #8 Nov 10 2019 13:45:00
%S 370851481,1310486905,1452092005,1553860945,2719940041,3328293745,
%T 3860623585,5394826801,5612626041,5659475185,6295936465,8857509661,
%U 9234602385,10780911505,10975165201,11718888181,12254138065,12416553721,12452890681,13577445505,14795826661
%N Pseudoprimes (base 2) equal to the product of 7 primes not necessarily distinct.
%H Amiram Eldar, <a href="/A112445/b112445.txt">Table of n, a(n) for n = 1..10000</a>
%e a(1) = 370851481 = 7*11*13*17*19*31*37.
%t 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 *)
%Y Intersection of A046308 and A001567.
%K easy,nonn
%O 1,1
%A _Shyam Sunder Gupta_, Dec 11 2005
%E More terms from _Amiram Eldar_, Nov 10 2019