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 A032554 #20 Nov 14 2021 10:43:40 %S A032554 0,1,8,72,64,521,621,433,521,972,1000,3311,8721,9721,7442,7533,9640, %T A032554 9431,8532,9865,8000,9621,86410,76211,84321,65521,77651,98631,95221, %U A032554 98432,72000,99721,87632,97533,94330,87542,66654,65530,87542,99531 %N A032554 Arrange digits of cubes in descending order. %H A032554 Robert Israel, <a href="/A032554/b032554.txt">Table of n, a(n) for n = 0..10000</a> %F A032554 a(n) = A004186(A000578(n)). - _Michel Marcus_, Mar 12 2020 %p A032554 f:= proc(n) local L,i; %p A032554 L:= sort(convert(n^3,base,10)); %p A032554 add(L[i]*10^(i-1),i=1..nops(L)) %p A032554 end proc: %p A032554 map(f, [$0..100]); # _Robert Israel_, Mar 12 2020 %t A032554 Table[FromDigits[Sort[IntegerDigits[n^3],Greater]],{n,0,40}] (* _Harvey P. Dale_, Nov 14 2021 *) %Y A032554 Cf. A000578, A004186, A032553. %K A032554 nonn,base,look %O A032554 0,3 %A A032554 _Patrick De Geest_, Apr 15 1998