%I A099274
%S A099274 8,23,67,143,353,527,905,1187,1751,2785,3287,4691,5843,6589,7947,10157,
%T A099274 12661,13787,16715,18941,20325,23889,26643,30771,36501,39861,41937,
%U A099274 45581,47801,51749,64743,69357,76161,79093,90677,93855,101769,110069
%N A099274 Sum of the prime(n) primes following prime(n).
%e A099274 a(3) = 7 + 11 + 13 + 17 + 19 = 67 since p_3 = 5 and the sum of the next 
               5 prime numbers after 5 is 67.
%t A099274 list = {}; For[x = 1, x < 100 (*change this value to get more terms*), 
               x++, AppendTo[list, Sum[Prime[n], {n, x + 1, x + Prime[x]}]]]; list
%Y A099274 Sequence in context: A048770 A055273 A059209 this_sequence A036562 A088448 
               A005878
%Y A099274 Adjacent sequences: A099271 A099272 A099273 this_sequence A099275 A099276 
               A099277
%K A099274 nonn
%O A099274 1,1
%A A099274 Matthew Howells (mathmatt(AT)gmail.com), Nov 16 2004