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

Author

Amarnath Murthy, Aug 03 2005

Keywords

• base
• nonn

Examples

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

Links

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

Crossrefs

Cf. A373203.

Programs

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 *)

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

Formula

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

Extensions

More terms from Harvey P. Dale, Dec 20 2006