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 A371047 #9 Mar 09 2024 11:06:25 %S A371047 0,1,10,11,100,101,110,1000,1001,1010,1100,1434,1716,1767,1776,1884, %T A371047 2094,2112,2133,2208,2271,2292,2298,2514,2544,2556,2604,2628,2892, %U A371047 2919,2922,2976,3006,3018,3066,3078,3096,3111,3126,3138,3144,3159,3162,3492,3498,3504 %N A371047 Numbers k such that the digital sum of k^4 is a fourth power. %H A371047 Stefano Spezia, <a href="/A371047/b371047.txt">Table of n, a(n) for n = 1..10000</a> %F A371047 a(n) = A371004(n)^(1/4). %t A371047 Select[Range[0,4000]^4,IntegerQ[DigitSum[#]^(1/4)]&]^(1/4) %Y A371047 Cf. A000583, A007953, A011557 (subsequence), A038444 (subsequence), A061910, A237525, A371004. %K A371047 nonn,base,easy %O A371047 1,3 %A A371047 _Stefano Spezia_, Mar 09 2024