A305546 Primes that are sums of three, five, seven and eleven consecutive primes.
311, 67141, 125963951, 161888809, 201388259, 559069591, 669472577, 917135831, 951993491, 974896207, 1103919101, 1128722657, 1426246369, 1691534683, 1977185207, 2455167607, 2472527851, 2558204381, 2583232213, 2643398713, 2708464399, 2815245317, 2868455287
Offset: 1
Keywords
Links
- Harvey P. Dale, Table of n, a(n) for n = 1..36 (All terms from using the first 100 million primes.)
Programs
-
Mathematica
Module[{nn=10^8,prs,p3,p5,p7,p11},prs=Prime[Range[nn]];p3=Select[ Total/@ Partition[ prs,3,1],PrimeQ];p5=Select[Total/@Partition[prs,5,1],PrimeQ];p7=Select[ Total/@Partition[prs,7,1],PrimeQ];p11=Select[Total/@Partition[prs,11,1],PrimeQ];Intersection[ p3,p5,p7,p11]] (* Harvey P. Dale, Sep 05 2022 *)
Extensions
a(7)-a(23) from Giovanni Resta, Jun 07 2018
Comments