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 A087480 #17 May 11 2019 15:59:54
%S A087480 2,11,136,2537,163588,4990397,415329070,17398892111,1818551553574,
%T A087480 422525784853775,25831002681258606,6608783008521293887,
%U A087480 931711885323534923208,74817069229462038688657
%N A087480 Sum of all the primes raised to their corresponding powers.
%H A087480 Robert Israel, <a href="/A087480/b087480.txt">Table of n, a(n) for n = 1..299</a>
%F A087480 a(n) = a(n-1) + prime(n)^n where prime(n) is the n-th prime.
%e A087480 a(4) = 2^1 + 3^2 + 5^3 + 7^4 = 2 + 9 + 125 + 2401 = 2537.
%p A087480 ListTools:-PartialSums( [seq(ithprime(i)^i, i=1..100)]); # _Robert Israel_, Nov 09 2015
%t A087480 a[1] = 2; a[n_] := a[n - 1] + Prime[n]^n; Table[a[n], {n, 15}] (* _Carlos Eduardo Olivieri_, Nov 09 2015 *)
%t A087480 Accumulate[Table[Prime[n]^n,{n,20}]] (* _Harvey P. Dale_, May 11 2019 *)
%o A087480 (PARI) a(n) = sum(i=1, n, prime(i)^i); \\ _Michel Marcus_, Sep 05 2013
%Y A087480 Partial sums of A062457.
%K A087480 easy,nonn
%O A087480 1,1
%A A087480 Andy Edwards (AndynGen(AT)aol.com), Sep 09 2003
%E A087480 Corrected and extended by _Ray Chandler_, Sep 14 2003