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 A022094 #10 Jan 14 2019 14:44:48
%S A022094 5,10,28,58,160,238,440,568,874,1480,1720,2584,3266,3638,4438,5830,
%T A022094 7418,7982,9854,11240,11966,14288,15968,18650,22548,24680,25800,28104,
%U A022094 29296,31734,41022,43940,48494
%N A022094 Sum of first prime(n) primes.
%H A022094 Robert Israel, <a href="/A022094/b022094.txt">Table of n, a(n) for n = 1..10000</a>
%F A022094 a(n) = A007504(A000040(n)). - _Robert Israel_, Jan 13 2019
%p A022094 [ seq(sum(ithprime(k),k=1..ithprime(i)),i=1..100) ];
%p A022094 # Alternative:
%p A022094 Primes:= select(isprime, [2,seq(i,i=3..10^4,2)]):
%p A022094 L:= ListTools:-PartialSums(Primes):
%p A022094 seq(L[Primes[i]],i=1..numtheory:-pi(nops(Primes))); # _Robert Israel_, Jan 13 2019
%t A022094 a[n_]:=Sum[Prime[k], {k,1,Prime[n]}]; Array[a, 50] (* _Stefano Spezia_, Jan 14 2019 *)
%Y A022094 Cf. A000040, A007504 (sum of first n primes).
%K A022094 easy,nonn
%O A022094 1,1
%A A022094 Detlef Pauly (dettodet(AT)yahoo.de)