login
This site is supported by donations to The OEIS Foundation.

 

Logo


Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A276959 Sum of squares of digits in all divisors of n. 1
1, 5, 10, 21, 26, 50, 50, 85, 91, 31, 3, 71, 11, 71, 61, 122, 51, 196, 83, 51, 64, 15, 14, 155, 55, 55, 144, 155, 86, 111, 11, 135, 30, 80, 109, 262, 59, 160, 110, 131, 18, 141, 26, 63, 183, 70, 66, 272, 147, 85, 86, 100, 35, 290, 78, 280, 166, 179, 107, 172, 38 (list; graph; refs; listen; history; text; internal format)
OFFSET

1,2

LINKS

Table of n, a(n) for n=1..61.

EXAMPLE

a(18) = 1^2+2^2+3^2+6^2+9^2+1^2+8^2 = 196 because divisors of 18 are 1,2,3,6,9,18.

a(31) = 1^2+3^2+1^2 = 11 because divisors of 31 are 1,31.

MATHEMATICA

Table[Total@ Flatten@ Map[#^2 &, IntegerDigits@ Divisors@ n], {n, 61}] (* Michael De Vlieger, Sep 24 2016 *)

PROG

(PARI) ssd(n) = my(d=digits(n)); sum(k=1, #d, d[k]^2);

a(n) = sumdiv(n, d, ssd(d)); \\ Michel Marcus, Sep 22 2016

CROSSREFS

Cf. A003132.

Sequence in context: A017667 A241603 A242643 * A001157 A242644 A002800

Adjacent sequences:  A276956 A276957 A276958 * A276960 A276961 A276962

KEYWORD

nonn,base

AUTHOR

Bhushan Bade, Sep 22 2016

EXTENSIONS

More terms from Michel Marcus, Sep 22 2016

STATUS

approved

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Style Sheet | Transforms | Superseeker | Recent
The OEIS Community | Maintained by The OEIS Foundation Inc.

License Agreements, Terms of Use, Privacy Policy. .

Last modified September 20 12:43 EDT 2019. Contains 327238 sequences. (Running on oeis4.)