A207637 Squarefree sums of 3 successive primes.

10, 15, 23, 31, 41, 59, 71, 83, 97, 109, 131, 143, 159, 173, 187, 199, 211, 223, 235, 251, 269, 287, 301, 311, 319, 329, 349, 371, 395, 407, 439, 457, 471, 487, 503, 519, 533, 551, 565, 581, 589, 607, 633, 661, 679, 689, 701, 713, 731, 749, 771, 789, 803

Offset: 1

Author

Vladimir Joseph Stephan Orlovsky, Feb 19 2012

Keywords

• nonn
• easy

Links

• Vincenzo Librandi, Table of n, a(n) for n = 1..1000

Crossrefs

Cf. A206329.

Programs

Mathematica

Select[Table[Prime[n] + Prime[n + 1] + Prime[n + 2], {n, 300}], SquareFreeQ]

PARI

p=2;q=3;forprime(r=5,1e4,if(issquarefree(t=p+q+r),print1(t", "));p=q;q=r) \\ Charles R Greathouse IV, Jun 14 2013