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 A364797 #14 Jun 20 2025 08:09:36 %S A364797 2,5,9,29,49,137,281,359,449,1579,2029,2281,2677,5519,12527,13229, %T A364797 15451,17047,22409,24389,25931,29191,32687,42937,45757,53239,56443, %U A364797 59743,70201,81677,90863,95087,101627,113111,169343,200407,206911,256049,302977,330133,338707,356263 %N A364797 Prime powers that are equal to the sum of the first k prime powers (not including 1) for some k. %H A364797 Amiram Eldar, <a href="/A364797/b364797.txt">Table of n, a(n) for n = 1..10000</a> %e A364797 49 is a term because 49 is a prime power and 49 = 2 + 3 + 4 + 5 + 7 + 8 + 9 + 11. %t A364797 Select[Accumulate[Select[Range[2250], PrimePowerQ]], PrimePowerQ] %o A364797 (PARI) list(lim) = {my(s = 0); for(p = 1, lim, if(isprimepower(p), s += p; if(isprimepower(s), print1(s, ", "))));} \\ _Amiram Eldar_, Jun 20 2025 %Y A364797 Cf. A013918, A013921, A013932, A246655, A364796. %K A364797 nonn %O A364797 1,1 %A A364797 _Ilya Gutkovskiy_, Aug 08 2023