A127341 Primes that can be written as the sum of 13 consecutive primes.
691, 863, 983, 1153, 1283, 1553, 1621, 1753, 1823, 2111, 2239, 2311, 2963, 3191, 3617, 3853, 4099, 4357, 4519, 4597, 4999, 5081, 5393, 5471, 5623, 5693, 5849, 6229, 6491, 6971, 7349, 7673, 8123, 8191, 8669, 8933, 9391, 10141, 10499, 10949, 11273
Offset: 1
Keywords
Examples
691 = prime(10) + prime(11) + ... + prime(22) = 29 + 31 + ... + 79.
Links
- Syed Iddi Hasan, Table of n, a(n) for n = 1..10000
Programs
-
Mathematica
Select[Table[Sum[Prime[i], {i, n, n + 12}], {n, 1, 150}], PrimeQ[ # ] &] Select[Total/@Partition[Prime[Range[200]],13,1],PrimeQ] (* Harvey P. Dale, Aug 13 2021 *)
Extensions
Edited by Stefan Steinerberger, Jul 31 2007