[go: up one dir, main page]

login
A077253
Sum of digits squared plus sum of digits of n.
2
2, 6, 12, 20, 30, 42, 56, 72, 90, 2, 4, 8, 14, 22, 32, 44, 58, 74, 92, 6, 8, 12, 18, 26, 36, 48, 62, 78, 96, 12, 14, 18, 24, 32, 42, 54, 68, 84, 102, 20, 22, 26, 32, 40, 50, 62, 76, 92, 110, 30, 32, 36, 42, 50, 60, 72, 86, 102, 120, 42, 44, 48, 54, 62, 72, 84, 98, 114, 132
OFFSET
1,1
COMMENTS
Inspired by A071440. The quasi-periodic function. See also A077252.
LINKS
EXAMPLE
a(13)=14 because (1^2+3^2)+(1+3)=14.
MATHEMATICA
sd[n_]:=Module[{idn=IntegerDigits[n]}, Total[idn+idn^2]]; Array[sd, 80] (* Harvey P. Dale, Aug 12 2012 *)
PROG
(PARI) a(n)=my(d=digits(n)); sum(i=1, #d, d[i]^2)+sumdigits(n) \\ Charles R Greathouse IV, Nov 26 2016
CROSSREFS
KEYWORD
nonn,base,easy
AUTHOR
Zak Seidov, Nov 01 2002
STATUS
approved