# Greetings from The On-Line Encyclopedia of Integer Sequences! http://oeis.org/ Search: id:a077126 Showing 1-1 of 1 %I A077126 #15 Aug 28 2023 16:41:40 %S A077126 3,10,23,42,71,108,151,204,265,336,415,504,605,712,825,956,1095,1246, %T A077126 1409,1582,1763,1956,2155,2378,2607,2846,3097,3360,3631,3912,4205, %U A077126 4516,4833,5170,5519,5878,6251,6634,7031,7440,7861,8294,8737,9194,9657,10136,10627 %N A077126 Sum of even-indexed primes. %C A077126 Partial sums of A031215. - _Michel Marcus_, Oct 27 2015 %H A077126 Paolo Xausa, Table of n, a(n) for n = 1..10000 %e A077126 p_1=2, p_2=3, p_3=5 and p_4=7, therefore a(2) = p_2 + p_4 = 3 + 7 = 10. %t A077126 A077126list[nmax_]:=Accumulate[Prime[Range[2,2nmax,2]]];A077126list[100] (* _Paolo Xausa_, Aug 28 2023 *) %o A077126 (PARI) pc=1; ps=0; forprime (p=2,500,pc=3-pc; if (pc==1,ps=ps+p; print1(ps","))) %Y A077126 Cf. A031215, A077131. %K A077126 nonn %O A077126 1,1 %A A077126 _Jon Perry_, Nov 29 2002 # Content is available under The OEIS End-User License Agreement: http://oeis.org/LICENSE