|
%I #13 Aug 23 2023 13:29:46
%S 7025869314,7143258096,7931584062,8094273561,8920416357,9247560381
%N Numbers having each digit once and whose 6th power has each digit six times.
%C There are 6 numbers total. There are no higher powers with this property.
%H Patrick De Geest, <a href="http://www.worldofnumbers.com/ninedig4.htm">The nine digits (page 4) with some ten digit (pandigital) exceptions</a>
%H Author?, <a href="http://web.archive.org/web/20080708203024/http://blue.kakiko.com/mmrmmr/htm/eqtn11.html">All terms</a>
%e 7025869314 ^6 = 120281934463386157260042215510596389732740014997586987548736.
%t t = Select[Permutations[Range[0, 9]], #[[1]] > 0 &]; t2 = Select[t, Union[DigitCount[FromDigits[#]^6]] == {6} &]; FromDigits /@ t2
%Y Cf. A050278 (pandigital numbers), A199630, A199631, A365144, A199632.
%K nonn,base,fini,full
%O 1,1
%A _T. D. Noe_, Nov 09 2011
| 