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 A076408 #14 Feb 16 2025 08:32:47
%S A076408 1,5,13,22,38,63,90,122,158,207,271,352,452,573,698,826,970,1139,1335,
%T A076408 1551,1776,2019,2275,2564,2888,3231,3592,3992,4433,4917,5429,5958,
%U A076408 6534,7159,7835,8564,9348,10189,11089,12050,13050,14074,15163,16319,17544
%N A076408 Sum of first n perfect powers.
%H A076408 Hugo Pfoertner, <a href="/A076408/b076408.txt">Table of n, a(n) for n = 1..10000</a>
%H A076408 Eric Weisstein's World of Mathematics, <a href="https://mathworld.wolfram.com/PerfectPower.html">Perfect Powers</a>.
%e A076408 a(8) = 1+4+8+9+16+25+27+32 = 122.
%t A076408 Accumulate[Join[{1},Select[Range[1500],GCD@@FactorInteger[#][[All,2]]>1&]]] (* _Harvey P. Dale_, Feb 12 2023 *)
%o A076408 (PARI) print1(s=1,", ");for(k=2,1225,if(ispower(k),print1(s+=k,", "))) \\ _Hugo Pfoertner_, Jan 01 2019
%Y A076408 Cf. A001597, A025479, A076407, A322969.
%K A076408 nonn
%O A076408 1,2
%A A076408 _Reinhard Zumkeller_, Oct 09 2002