A382133 Products of 4 distinct primes that are the average of two consecutive primes.

462, 570, 714, 858, 870, 1190, 1230, 1254, 1290, 1302, 1482, 1590, 1722, 1785, 1806, 1995, 2046, 2130, 2170, 2210, 2470, 2490, 2870, 3030, 3045, 3255, 3390, 3410, 3705, 3774, 3795, 3885, 3930, 4002, 4218, 4242, 4278, 4422, 4510, 4515, 4641, 4785, 4935, 5010, 5110

Offset

1,1

Links

Table of n, a(n) for n=1..45.

Example

462 is a term because 462=2*3*7*11 is the product of four distinct primes and 462 = (461+463)/2.
714 is a term because 714=2*3*7*17 is the product of four distinct primes and 714 = (709+719)/2.
210 is not a term because although 210=2*3*5*7 is the product of four distinct primes 210 != (199 + 211)/2.

Mathematica

Select[Range[5200], 2*# == Plus @@ NextPrime[#, {-1, 1}] && FactorInteger[#][[;; , 2]] == {1, 1, 1, 1} &] (* Amiram Eldar, Mar 17 2025 *)

Crossrefs

Intersection of A024675 and A046386.

Cf. A078443, A130178.

Sequence in context: A267396 A258962 A267332 * A353022 A104397 A108749

Adjacent sequences: A382130 A382131 A382132 * A382134 A382135 A382136

Keyword

nonn

Author

Massimo Kofler, Mar 17 2025

Status

approved