|
|
A112445
|
|
Pseudoprimes (base 2) equal to the product of 7 primes not necessarily distinct.
|
|
1
|
|
|
370851481, 1310486905, 1452092005, 1553860945, 2719940041, 3328293745, 3860623585, 5394826801, 5612626041, 5659475185, 6295936465, 8857509661, 9234602385, 10780911505, 10975165201, 11718888181, 12254138065, 12416553721, 12452890681, 13577445505, 14795826661
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
LINKS
|
|
|
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
|
|
|
KEYWORD
|
easy,nonn
|
|
AUTHOR
|
|
|
EXTENSIONS
|
|
|
STATUS
|
approved
|
|
|
|