A213914 Primes that are sums of three, five, seven and nine consecutive primes.
28382041, 35213777, 64411157, 92223749, 132079147, 176955343, 253042357, 273128939, 365502299, 589730549, 644178091, 712541329, 827389151, 993274127, 1128722657, 1357950109, 1504974139, 1580552933, 1625263531, 1665516431, 1666495867, 1848493579, 2218519117
Offset: 1
Keywords
Links
- Zak Seidov, Table of n, a(n) for n = 1..48
Programs
-
Mathematica
Block[{r = Prime@ Range[10^7], s}, Intersection @@ Array[Select[Total /@ Partition[r, 2 # + 1, 1], PrimeQ] &, 4] ] (* Michael De Vlieger, Dec 11 2017 *)
Extensions
a(10)-a(23) from Giovanni Resta, Mar 05 2013
Comments