A111442 Least perfect power of n containing all the distinct digits of n.

1, 32, 243, 64, 25, 36, 16807, 32768, 729, 100, 121, 1728, 371293, 38416, 11390625, 1048576, 1419857, 1889568, 893871739, 3200000, 9261, 234256, 3404825447, 13824, 625, 208827064576, 729, 17210368, 24389, 24300000, 923521, 32768, 35937, 39304, 1838265625

Offset

1,2

Links

James C. McMahon, Table of n, a(n) for n = 1..1000

Formula

a(n) = n^A373203(n). - Michel Marcus, Jun 01 2024

Example

a(12) = 1728 = 12^3, as 144=12^2 does not contain 2.

Mathematica

seq={}; Do[k=1;  Until[  ContainsAll[IntegerDigits[n^k], IntegerDigits[n] ], k++  ]; AppendTo[seq, n^k] , {n, 35}]; seq (* James C. McMahon, Jun 01 2024 *)

Prog

(PARI) a(n) = my(k=2, d=Set(digits(n))); while(setintersect(Set(digits(n^k)), d) != d, k++); n^k; \\ Michel Marcus, Jun 03 2024

Crossrefs

Cf. A373203.

Sequence in context: A351193 A070332 A373291 * A104782 A186774 A223952

Adjacent sequences: A111439 A111440 A111441 * A111443 A111444 A111445

Keyword

base,nonn

Author

Amarnath Murthy, Aug 03 2005

Extensions

More terms from Harvey P. Dale, Dec 20 2006

Status

approved