|
|
A129450
|
|
a(n) = smallest perfect power that begins and ends with digit n, 1 <= n <= 9; one-digit numbers are excluded.
|
|
1
|
|
|
|
OFFSET
|
1,1
|
|
LINKS
|
|
|
EXAMPLE
|
a(8) = 202^3 = 8242408; there is no smaller perfect power that begins and ends with digit 8.
|
|
PROG
|
(Magma) PP:=[1] cat [ n: n in [2..9000000] | IsPower(n) ]; firstlast:=function(x); for n:=1 to #PP do k:=Intseq(PP[n], 10); if #k gt 1 and k[1] eq x and k[ #k] eq x then return PP[n]; end if; end for; return -1; end function; [ firstlast(d): d in [1..9] ]; // Klaus Brockhaus, Apr 16 2007
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn,base,fini,full
|
|
AUTHOR
|
|
|
EXTENSIONS
|
|
|
STATUS
|
approved
|
|
|
|