cp's OEIS Frontend

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.

A032554 Arrange digits of cubes in descending order.

This page as a plain text file.
%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