login
A067443
Smallest n-th power starting with 2.
10
2, 25, 27, 256, 243, 262144, 2187, 256, 262144, 282475249, 2048, 244140625, 2541865828329, 268435456, 205891132094649, 2821109907456, 232630513987207, 262144, 274877906944, 278218429446951548637196401, 2097152, 2384185791015625, 27368747340080916343
OFFSET
1,1
COMMENTS
Terms from Robert G. Wilson v.
LINKS
MAPLE
f:= proc(n) local x, y;
for x from 2 do
y:= x^n;
if floor(y/10^ilog10(y)) = 2 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]] != 2, k++ ]; a = Append[a, k^n], {n, 1, 25}]; a (* Robert G. Wilson v *)
PROG
(Python)
def a(n):
r = 1
while str(r**n)[0] != '2': r += 1
return r**n
print([a(n) for n in range(1, 24)]) # Michael S. Branicky, Feb 25 2021
CROSSREFS
Cf. A067442.
Sequence in context: A396124 A054283 A041723 * A163497 A264118 A054292
KEYWORD
base,easy,nonn
AUTHOR
Amarnath Murthy, Feb 05 2002
STATUS
approved