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 A364947 #9 Jun 20 2025 03:27:51
%S A364947 1,3,79,163,499,947,1279,5297,6689,9629,10853,17467,21001,23887,25411,
%T A364947 29761,32089,33289,47947,49429,55633,80687,84697,96157,116719,119159,
%U A364947 126641,131783,136991,153371,156227,167861,182969,215249,243161,257921,280897,288853
%N A364947 Prime powers that are equal to the sum of the first k prime powers (including 1) for some k.
%H A364947 Amiram Eldar, <a href="/A364947/b364947.txt">Table of n, a(n) for n = 1..10000</a>
%e A364947 79 is a term because 79 is a prime power and 79 = 1 + 2 + 3 + 4 + 5 + 7 + 8 + 9 + 11 + 13 + 16 = 1 + 2 + 3 + 2^2 + 5 + 7 + 2^3 + 3^2 + 11 + 13 + 2^4.
%t A364947 Select[Accumulate[Select[Range[2000], # == 1 || PrimePowerQ[#] &]], # == 1 || PrimePowerQ[#] &]
%o A364947 (PARI) isp(n) = n == 1 || isprimepower(n);
%o A364947 list(lim) = {my(s = 0); for(p = 1, lim, if(isp(p), s += p; if(isp(s), print1(s, ", "))));} \\ _Amiram Eldar_, Jun 20 2025
%Y A364947 Intersection of A000961 and A024918.
%Y A364947 Cf. A013918, A013921, A013932, A364797
%K A364947 nonn
%O A364947 1,2
%A A364947 _Ilya Gutkovskiy_, Aug 14 2023