|
|
A108302
|
|
Concatenate n and the sum of the digits of n raised to their own power (A045503).
|
|
3
|
|
|
1, 11, 24, 327, 4256, 53125, 646656, 7823543, 816777216, 9387420489, 102, 112, 125, 1328, 14257, 153126, 1646657, 17823544, 1816777217, 19387420490, 205, 215, 228, 2331, 24260, 253129, 2646660, 27823547, 2816777220, 29387420493, 3028, 3128
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
0,2
|
|
LINKS
|
|
|
EXAMPLE
|
a(15)=153126 because 1^1 + 5^5 = 3126.
|
|
MATHEMATICA
|
cnsd[n_]:=Module[{idn=IntegerDigits[n]/.(0->1), c}, c=Total[idn^idn]; n*10^IntegerLength[c]+c]; Join[{1}, cnsd/@Range[40]] (* Harvey P. Dale, Nov 25 2016 *)
|
|
CROSSREFS
|
|
|
KEYWORD
|
base,easy,nonn
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|