A229059 Smallest of 13 consecutive primes whose sum is a prime.

29, 41, 47, 61, 71, 89, 97, 103, 107, 131, 139, 149, 193, 211, 241, 263, 277, 293, 311, 313, 349, 353, 379, 383, 397, 401, 419, 443, 461, 491, 521, 557, 593, 599, 631, 647, 677, 739, 761, 809, 827, 877, 983, 1013, 1039, 1061, 1109, 1117, 1171, 1193, 1201

Offset

1,1

Links

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

Example

a(1)=29 since 29+31+37+41+43+47+53+59+61+67+71+73+79=691 is a prime.

Mathematica

Transpose[Select[Partition[Prime[Range[250]], 13, 1], PrimeQ[Total[#]]&]][[1]]

Prog

(Magma) [NthPrime(n): n in [1..200] | IsPrime(&+[NthPrime(n+s): s in [0..12]])];

Crossrefs

Cf. A073681, A152468, A180948, A189571, A180950, A226380.

Sequence in context: A101007 A253252 A155575 * A330653 A125516 A068480

Adjacent sequences: A229056 A229057 A229058 * A229060 A229061 A229062

Keyword

nonn

Author

Vincenzo Librandi, Sep 13 2013

Status

approved