A199632 Numbers having each digit once and whose 5th power has each digit five times.
7351062489, 8105632794, 8401253976, 8731945026, 9164072385, 9238750614, 9615278340, 9847103256
Offset: 1
Examples
7351062489 ^5 = 21465972705539303240727164839587886180361092651449.
Links
- Patrick De Geest, The nine digits (page 4) with some ten digit (pandigital) exceptions
- Author?, All terms
Programs
-
Mathematica
t = Select[Permutations[Range[0, 9]], #[[1]] > 0 &]; t2 = Select[t, Union[DigitCount[FromDigits[#]^5]] == {5} &]; FromDigits /@ t2
Comments