# Greetings from The On-Line Encyclopedia of Integer Sequences! http://oeis.org/ Search: id:a288639 Showing 1-1 of 1 %I A288639 #17 Jun 23 2017 08:19:28 %S A288639 24,48,72,108,120,168,180,216,240,252,288,360,408,432,504,540,552,600, %T A288639 612,648,720,756,768,792,828,864,900,912,960,1080,1128,1152,1188,1224, %U A288639 1248,1260,1296,1368,1392,1440,1620,1656,1680,1692,1728,1800,1836,1848 %N A288639 Products of two distinct numbers that are the average of a pair of twin primes. %e A288639 4 and 12 are two distinct numbers that are averages of twin prime pairs (i.e., 4 = (3+5)/2 and 12 = (11+13)/2), and 4*12 = 48, which is in the sequence. %t A288639 m = 1 + Select[Range@1000, PrimeQ[#] && PrimeQ[# + 2] &]; Select[v Union@ Flatten@ Table[m[[i]] m[[j]], {i, Length[m]}, {j, i - 1}], # <= 4000 &] (* _Giovanni Resta_, Jun 13 2017 *) %Y A288639 Cf. A014574, A249628. %Y A288639 Subset of A286195. %K A288639 nonn %O A288639 1,1 %A A288639 _Wesley Ivan Hurt_, Jun 12 2017 %E A288639 More terms from _Giovanni Resta_, Jun 13 2017 # Content is available under The OEIS End-User License Agreement: http://oeis.org/LICENSE