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 A373727 #35 Apr 03 2025 01:40:05 %S A373727 8,10,18,28,28,44,46,54,63,73,80,82,98,100,109,118,125,136,144,154, %T A373727 154,163,172,181,190,190,199,208,217,226,235,243,253,260,262,278 %N A373727 a(n) is the largest number that is the digit sum of an n-digit cube. %H A373727 Kevin Ryde, <a href="/A373727/a373727_1.c.txt">C Code</a> %e A373727 a(7) = 46 because 46 is the largest digital sum encountered among all 7-digit cubes (attained at 3 cubes: 3869893, 7880599, 8998912). %t A373727 Table[Max@ %t A373727 Map[Total@IntegerDigits[#^3] &, %t A373727 Range[Ceiling@CubeRoot[10^(n - 1)], CubeRoot[10^n - 1]]], {n, 15}] %o A373727 (Python) %o A373727 from sympy import integer_nthroot %o A373727 def A373727(n): return max(sum(int(d) for d in str(m**3)) for m in range(1+integer_nthroot(10**(n-1)-1,3)[0],1+integer_nthroot(10**n-1,3)[0])) # _Chai Wah Wu_, Jun 26 2024 %o A373727 (C) /* See links. */ %Y A373727 Cf. A018005, A061439. %Y A373727 Other powers: A371728, A373914, A374025, A373994. %K A373727 nonn,base,more %O A373727 1,1 %A A373727 _Zhining Yang_, Jun 15 2024