A165287 Primes which are the sum of at least 3 consecutive odd nonprimes (A014076) >1.

61, 71, 73, 97, 107, 163, 179, 197, 233, 239, 257, 263, 271, 307, 331, 349, 359, 367, 397, 409, 419, 421, 461, 467, 479, 487, 503, 523, 547, 571, 593, 599, 613, 617, 631, 659, 677, 691, 709, 727, 733, 743, 757, 761, 787, 809, 811, 821, 827, 839, 857

Offset: 1

Author

Vladimir Joseph Stephan Orlovsky, Sep 13 2009

Keywords

• nonn

Examples

			15+21+25 = 61, 9+15+21+25+27 = 97.
		

Crossrefs

Cf. A106091.

Programs

Mathematica

lst={};Do[If[PrimeQ[m],Continue[]];s=m;Do[If[PrimeQ[n],Continue[]];s+=n;If[PrimeQ[s],If[s<=2917,AppendTo[lst,s]]],{n,m+2,2*6!,2}],{m,1,2*6!,2}];lst=Take[Union@lst,200]

PARI

N=1000;v=vector(N);L=listcreate();n=9;while(nRalf Stephan, Nov 26 2013

Extensions

Edited by Ralf Stephan, Nov 26 2013