1,2

3^(3^3) = 7625597484987 and the sum of these digits is 81, the third term.

Table[Apply[Plus, IntegerDigits[i^i^i]], {i, 1, 10}]

Cf. A002488.

Sequence in context: A058785 A050861 A083226 this_sequence A112119 A058575 A013522

Adjacent sequences: A088732 A088733 A088734 this_sequence A088736 A088737 A088738

nonn

Hans Havermann (pxp(AT)rogers.com), Nov 23 2003