A089995 Products of pairs of distinct, non-consecutive primes.
10, 14, 21, 22, 26, 33, 34, 38, 39, 46, 51, 55, 57, 58, 62, 65, 69, 74, 82, 85, 86, 87, 91, 93, 94, 95, 106, 111, 115, 118, 119, 122, 123, 129, 133, 134, 141, 142, 145, 146, 155, 158, 159, 161, 166, 177, 178, 183, 185, 187, 194, 201, 202, 203, 205, 206, 209, 213
Offset: 1
Keywords
Links
- Amiram Eldar, Table of n, a(n) for n = 1..10000
Programs
-
Mathematica
With[{nn = 213}, TakeWhile[#, # <= nn &] &@ Union@ Flatten@ Table[Function[p, p Prime@ Range[n + 2, Prime@ PrimePi[nn/p]]]@ Prime@ n, {n, Sqrt@ nn}]] (* Michael De Vlieger, Feb 02 2017 *)
Comments