A171613 a(n) = n^2 + sum of the digits of n^2.

0, 2, 8, 18, 23, 32, 45, 62, 74, 90, 101, 125, 153, 185, 212, 234, 269, 308, 333, 371, 404, 450, 500, 545, 594, 638, 695, 747, 803, 854, 909, 977, 1031, 1107, 1169, 1235, 1314, 1388, 1457, 1530, 1607, 1697, 1782, 1871, 1955, 2034, 2126, 2222, 2313, 2408, 2507

Offset

0,2

Comments

Subsequence of A062028 (n + sum of the digits of n).

Links

Table of n, a(n) for n=0..50.

Mathematica

Table[n^2+Total[IntegerDigits[n^2]], {n, 0, 100}]

Crossrefs

Cf. A062028, A171614, A171615.

Sequence in context: A094147 A117612 A320662 * A338140 A306394 A109136

Adjacent sequences: A171610 A171611 A171612 * A171614 A171615 A171616

Keyword

base,nonn

Author

Zak Seidov, Dec 13 2009

Status

approved