|
%I #9 Jun 05 2013 14:29:33
%S 17,19,23,29,31,43,47,53,61,71,79,89,97,103,107,113,127,137,151,233,
%T 257,313,317,359,367,373,379,383,401,461,463,487,499,503,509,521,577,
%U 587,617,619,761,797,821,827,839,853,881,883,907,1019,1061,1063,1069,1097
%N Smallest of seven (7) consecutive primes whose sum is a prime.
%C There are twins such as (17,19); (461,463); (1061,1063).
%C There are also consecutives such as (17,19,23,29,31); (359,367,373,379,383); (1949,1951,1973).
%H Zak Seidov, <a href="/A180948/b180948.txt">Table of n, a(n) for n = 1..10000</a>
%e a(7)=47+53+59+61+67+71+73=431 is a prime.
%t Transpose[Select[Partition[Prime[Range[500]],7,1],PrimeQ[Total[#]]&]] [[1]] (* _Harvey P. Dale_, Jun 05 2013 *)
%Y Cf. A000040, A073681, A082246, A152468, A189571, A180950, A226380.
%K nonn
%O 1,1
%A _Carmine Suriano_, Sep 27 2010
%E More cross references from _Harvey P. Dale_, Jun 05 2013
|
