A067444 Smallest n-th power starting with 3.
3, 36, 343, 38416, 32, 34012224, 35831808, 390625, 387420489, 3486784401, 362797056, 3138428376721, 34522712143931, 379749833583241, 32768, 33232930569601, 30491346729331195904, 387420489, 319479999370622926848
Offset: 1
Links
- Robert Israel, Table of n, a(n) for n = 1..657
Programs
-
Maple
f:= proc(n) local k,x; for k from 0 do x:= ceil((3*10^k)^(1/n))^n; if x < 4*10^k then return x fi od end proc: map(f, [$1..30]); # Robert Israel, Feb 12 2025
-
Mathematica
a = {}; Do[k = 1; While[First[IntegerDigits[k^n]] != 3, k++ ]; a = Append[a, k^n], {n, 1, 25}]; a (* Robert G. Wilson v *)
Comments