login

Year-end appeal: Please make a donation to the OEIS Foundation to support ongoing development and maintenance of the OEIS. We are now in our 61st year, we have over 378,000 sequences, and we’ve reached 11,000 citations (which often say “discovered thanks to the OEIS”).

A226277
Numbers m of the form u^v where u and v are digits in decimal representation of m.
2
1, 25, 3125, 4096, 15625, 19683, 46656, 59049, 78125, 117649, 279936, 1953125, 4782969, 5764801, 10077696, 387420489
OFFSET
1,2
COMMENTS
a(n) occurs in a(n)-th row of table A226272.
EXAMPLE
a(1) = 1 = 1^1;
a(2) = 25 = 5^2;
a(3) = 3125 = 5^5;
a(4) = 4096 = 4^6;
a(5) = 15625 = 5^6;
a(6) = 19683 = 3^9;
a(7) = 46656 = 6^6;
a(8) = 59049 = 9^5;
a(9) = 78125 = 5^7;
a(10) = 117649 = 7^6;
a(11) = 279936 = 6^7;
a(12) = 1953125 = 5^9;
a(13) = 4782969 = 9^7;
a(14) = 5764801 = 7^8;
a(15) = 10077696 = 6^9;
a(16) = 387420489 = 9^9.
256 = 2^8 = 4^4 is not a term, as neither 8 nor 4 occur in 256.
PROG
(Haskell)
import Data.List (sort)
a226277 n = a226277_list !! (n-1)
a226277_list = sort [w | u <- [0..9], v <- [0..9], let w = u ^ v,
"0123456789" !! u `elem` show w, "0123456789" !! v `elem` show w]
CROSSREFS
Sequence in context: A077519 A078215 A075414 * A013737 A018861 A178188
KEYWORD
nonn,base,fini,full
AUTHOR
Reinhard Zumkeller, Jul 09 2013
STATUS
approved