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 A099826 #16 Jul 01 2024 02:31:45 %S A099826 2,10,100,1264,15116,171148,1864190,19697700,203534530,2067129306, %T A099826 20706364528,205144046742,2014349179358,19632546354498, %U A099826 190150622868298,1831906588192414,17567504017456404,167794196312059488,1597037992049539274 %N A099826 Sum of the first 3^n primes. %H A099826 Amiram Eldar, <a href="/A099826/b099826.txt">Table of n, a(n) for n = 0..36</a> (calculated using Kim Walisch's primesum program) %H A099826 Cino Hilliard, <a href="http://groups.msn.com/First300billionprimes/sumprimeslt2n.msnw">Sum first 2^n Primes</a>. [Link corrected by Alexey Beshenov, Jan 25 2009] [broken link] %H A099826 Kim Walisch, <a href="https://github.com/kimwalisch/primesum">Sum of the primes below x (primesum)</a>. %F A099826 a(n) = A007504(A000244(n)). - _Amiram Eldar_, Jul 01 2024 %t A099826 NextPrim[n_] := Block[{k = n + 1}, While[ !PrimeQ[k], k++ ]; k]; k = p = 1; s = 0; Do[ While[p = NextPrim[p]; s = s + p; k < 10^n, k++ ]; k++; Print[s], {n, 0, 16}] %Y A099826 Cf. A000040, A000244, A006988, A007504, A038833, A099824, A099825. %K A099826 nonn %O A099826 0,1 %A A099826 _Robert G. Wilson v_, Oct 25 2004 %E A099826 More terms from _Cino Hilliard_, Jan 14 2006