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 A291140 #20 Aug 24 2017 13:44:56 %S A291140 2,13,160,3123,181258,6732437,493478344,24995572327,2255433009730, %T A291140 470444892889497,38714638073629150,7749166585021832891, %U A291140 1203906832960860262108,121893712541593098356317,17161342484454585041813494 %N A291140 Sum of the n-th powers of the first n primes. %H A291140 Vojtech Strnad, <a href="/A291140/b291140.txt">Table of n, a(n) for n = 1..200</a> %F A291140 a(n) = prime(1)^n + prime(2)^n + ... + prime(n)^n. %e A291140 a(3) = 2^3 + 3^3 + 5^3 = 160. %p A291140 f:= n -> add(ithprime(i)^n,i=1..n): %p A291140 map(f, [$1..20]); # _Robert Israel_, Aug 20 2017 %t A291140 Table[Total[Prime[Range@ n]^n], {n, 15}] (* _Michael De Vlieger_, Aug 19 2017 *) %o A291140 (PARI) a(n) = sum(i=1, n, prime(i)^n) \\ _Felix Fröhlich_, Aug 18 2017 %Y A291140 Cf. A031971, A062457, A087480. %K A291140 nonn %O A291140 1,1 %A A291140 _Vojtech Strnad_, Aug 18 2017