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 A135484 #15 Nov 30 2023 17:06:33 %S A135484 1,9,252,16636,48844761,13109538777,232643623525984, %T A135484 144347831699381856,8863082467484200477785, %U A135484 100000008863082467484200477785,192043424966613562971631041769596 %N A135484 a(n) = Sum_{i=1..n} i^prime(i), where prime(i) denotes i-th prime number. %H A135484 G. C. Greubel, <a href="/A135484/b135484.txt">Table of n, a(n) for n = 1..75</a> %t A135484 f[n_] := Sum[i^Prime@i, {i, n}]; Array[f, 12] (* _Robert G. Wilson v_, Feb 12 2008 *) %t A135484 Accumulate[Table[n^Prime[n],{n,15}]] (* _Harvey P. Dale_, Nov 30 2023 *) %o A135484 (PARI) a(n) = sum(k=1, n, k^prime(k)); \\ _Michel Marcus_, Oct 15 2016 %Y A135484 Cf. A000040, A087480. %Y A135484 Partial sums of A062481. %K A135484 nonn %O A135484 1,2 %A A135484 _Ctibor O. Zizka_, Feb 07 2008 %E A135484 Edited and extended by _Robert G. Wilson v_, Feb 12 2008