%I #4 Nov 09 2017 09:36:38
%S 199,211,223,281,293,317,353,439,461,563,587,599,647,659,683,751,881,
%T 997,1009,1021,1231,1361,1373,1429,1451,1597,1609,2003,2027,2039,2089,
%U 2113,2137,2297,2351,2383,2441,2477,2549,2833,2857,3121,3169,3181,3319
%N Primes which are the sum of nine consecutive composite numbers.
%H Harvey P. Dale, <a href="/A151738/b151738.txt">Table of n, a(n) for n = 1..1000</a>
%t Select[Total/@Partition[Select[Range[1000],CompositeQ],9,1],PrimeQ] (* _Harvey P. Dale_, Nov 09 2017 *)
%K nonn
%O 1,1
%A _Claudio Meller_, Jun 15 2009