A353022 Products of four distinct primes between twin primes.
462, 570, 858, 1230, 1290, 1302, 1482, 1722, 2130, 3390, 3930, 4002, 4218, 4242, 4422, 5010, 5478, 5502, 5658, 6690, 6870, 7458, 7878, 8430, 8862, 9042, 9462, 9858, 9930, 10038, 10302, 11058, 11118, 11490, 11778, 13002, 13710, 13830, 13902, 14010, 15270, 15738
Offset: 1
Keywords
Examples
462 = 2*3*7*11 between 461 and 463 (twin primes); 570 = 2*3*5*19 between 569 and 571; 858 = 2*3*11*13 between 857 and 859; 1230 = 2*3*5*41 between 1229 and 1231.
Programs
-
Mathematica
Select[Range[20000], And @@ PrimeQ[# + {-1, 1}] && FactorInteger[#][[;; , 2]] == {1, 1, 1, 1} &] (* Amiram Eldar, Apr 17 2022 *)