A103173 Numbers k such that the decimal digits of k are not present in k^2, k^3, or k^4.
2, 3, 7, 8, 53, 77
Offset: 1
Examples
For k=77, the 1st through 4th powers are {77, 5929, 456533, 35153041}. Digits of k appear first in the 5th powers {32, 243, 16807, 32768, 418195493, 2706784157}.
Programs
-
Mathematica
Select[Range[10^3],ContainsNone[IntegerDigits[#],Union[IntegerDigits[#^2],IntegerDigits[#^3],IntegerDigits[#^4]]]&] (* James C. McMahon, Jan 17 2024 *)
Comments