login
Sum of digits of n plus sum of cubes of digits of n.
2

%I #6 Jul 15 2017 12:24:21

%S 0,2,10,30,68,130,222,350,520,738,2,4,12,32,70,132,224,352,522,740,10,

%T 12,20,40,78,140,232,360,530,748,30,32,40,60,98,160,252,380,550,768,

%U 68,70,78,98,136,198,290,418,588,806,130,132,140,160,198,260,352,480,650

%N Sum of digits of n plus sum of cubes of digits of n.

%H Harvey P. Dale, <a href="/A065137/b065137.txt">Table of n, a(n) for n = 0..1000</a>

%F a(n) = A007953(n)+A055012(n)

%e a(23) = (2+3)+(2^3+3^3) = 40.

%t Table[Total[IntegerDigits[n]]+Total[IntegerDigits[n]^3],{n,0,60}] (* _Harvey P. Dale_, Jul 15 2017 *)

%Y Cf. A065138.

%K base,easy,nonn

%O 0,2

%A _Henry Bottomley_, Oct 15 2001