A151738 Primes which are the sum of nine consecutive composite numbers.
199, 211, 223, 281, 293, 317, 353, 439, 461, 563, 587, 599, 647, 659, 683, 751, 881, 997, 1009, 1021, 1231, 1361, 1373, 1429, 1451, 1597, 1609, 2003, 2027, 2039, 2089, 2113, 2137, 2297, 2351, 2383, 2441, 2477, 2549, 2833, 2857, 3121, 3169, 3181, 3319
Offset: 1
Keywords
Links
- Harvey P. Dale, Table of n, a(n) for n = 1..1000
Programs
-
Mathematica
Select[Total/@Partition[Select[Range[1000],CompositeQ],9,1],PrimeQ] (* Harvey P. Dale, Nov 09 2017 *)