This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.
%I A096208 #14 Jan 09 2025 18:48:55 %S A096208 2,7,89,659,1181,5021,9923,10909,11941,17959,26879,48437,53077,65707, %T A096208 71191,74051,119723,135019,147151,173053,226381,293177,323797,362911, %U A096208 411449,470621,478321,542251,575837,592987,646259,721141,730819,740599 %N A096208 Prime partial sums of the odd-indexed primes. %C A096208 Subsequence of primes of A077131. - _Michel Marcus_, Oct 21 2015 %H A096208 Robert Israel, <a href="/A096208/b096208.txt">Table of n, a(n) for n = 1..10000</a> %e A096208 a(3) = 89 because 89 = 2 + 5 + 11 + 17 + 23 + 31. %p A096208 oip:= [seq(ithprime(i), i=1..10^4, 2)]: %p A096208 select(isprime, ListTools:-PartialSums(oip)); # _Robert Israel_, Jan 09 2025 %t A096208 Select[Table[Plus @@ Prime[2Range[i] - 1], {i, 1000}], PrimeQ[ # ] &] %o A096208 (PARI) lista(nn) = {s = 0; add = 1; forprime(p=1, nn, if (add, s += p; if (isprime(s), print1(s, ", "));); add = ! add;);} \\ _Michel Marcus_, Oct 21 2015 %Y A096208 Intersection of A077131 and A000040. %K A096208 nonn %O A096208 1,1 %A A096208 _Alonso del Arte_, Jul 27 2004 %E A096208 Name clarified by _Robert Israel_, Jan 09 2025