A134010 a(n) = n^(initial digit of n).
1, 1, 4, 27, 256, 3125, 46656, 823543, 16777216, 387420489, 10, 11, 12, 13, 14, 15, 16, 17, 18, 19, 400, 441, 484, 529, 576, 625, 676, 729, 784, 841, 27000, 29791, 32768, 35937, 39304, 42875, 46656, 50653, 54872, 59319, 2560000, 2825761, 3111696
Offset: 0
Links
- R. Zumkeller, Table of n, a(n) for n = 0..10000
Programs
-
Mathematica
a[n_]:= n^First[IntegerDigits[n]];Join[{1},Array[a,42]] (* James C. McMahon, Mar 30 2025 *)
Comments