A067450 Smallest n-th power starting with 9.
9, 9, 9261, 923521, 9765625, 9474296896, 94931877133, 9682651996416, 922190162669056, 9765625, 952809757913927, 95428956661682176, 96889010407, 9012061295995008299689, 931322574615478515625
Offset: 1
Links
- Robert Israel, Table of n, a(n) for n = 1..533
Programs
-
Maple
f:= proc(n) local x, y; for x from 2 do y:= x^n; if floor(y/10^ilog10(y)) = 9 then return x^n fi od end proc: map(f, [$1..50]); # Robert Israel, Apr 02 2025
-
Mathematica
a = {}; Do[k = 1; While[First[IntegerDigits[k^n]] != 9, k++ ]; a = Append[a, k^n], {n, 1, 25}]; a (* Robert G. Wilson v *)
Comments