A065137 Sum of digits of n plus sum of cubes of digits of n.

0, 2, 10, 30, 68, 130, 222, 350, 520, 738, 2, 4, 12, 32, 70, 132, 224, 352, 522, 740, 10, 12, 20, 40, 78, 140, 232, 360, 530, 748, 30, 32, 40, 60, 98, 160, 252, 380, 550, 768, 68, 70, 78, 98, 136, 198, 290, 418, 588, 806, 130, 132, 140, 160, 198, 260, 352, 480, 650

Offset

0,2

Links

Harvey P. Dale, Table of n, a(n) for n = 0..1000

Formula

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

Example

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

Mathematica

Table[Total[IntegerDigits[n]]+Total[IntegerDigits[n]^3], {n, 0, 60}] (* Harvey P. Dale, Jul 15 2017 *)

Crossrefs

Cf. A065138.

Sequence in context: A047198 A290461 A162524 * A034262 A180499 A167214

Adjacent sequences: A065134 A065135 A065136 * A065138 A065139 A065140

Keyword

base,easy,nonn

Author

Henry Bottomley, Oct 15 2001

Status

approved