This site is supported by donations to The OEIS Foundation.

 Hints (Greetings from The On-Line Encyclopedia of Integer Sequences!)
 A069293 Sum of square divisors of n <= sqrt(n). 3
 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 5, 1, 1, 1, 5, 1, 1, 1, 5, 1, 1, 1, 5, 1, 1, 1, 5, 1, 1, 1, 5, 1, 1, 1, 5, 1, 1, 1, 5, 1, 1, 1, 5, 1, 1, 1, 5, 1, 1, 1, 5, 1, 1, 1, 5, 1, 1, 1, 5, 1, 1, 1, 5, 1, 1, 1, 5, 1, 1, 1, 5, 1, 1, 1, 5, 10, 1, 1, 5, 1, 1, 1, 5, 1, 10, 1, 5, 1, 1, 1, 5, 1, 1, 10, 5, 1, 1, 1, 5, 1 (list; graph; refs; listen; history; text; internal format)
 OFFSET 1,16 LINKS Antti Karttunen, Table of n, a(n) for n = 1..16384 MATHEMATICA Table[DivisorSum[n, # &, And[IntegerQ@ Sqrt@ #, # <= Sqrt@ n] &], {n, 105}] (* Michael De Vlieger, Nov 20 2017 *) PROG (PARI) A069293(n) = sumdiv(n, d, (issquare(d)&&((d^2)<=n))*d); \\ Antti Karttunen, Nov 20 2017 CROSSREFS Cf. A000188, A035316, A046951, A069290, A069291, A069292. Sequence in context: A051008 A304042 A109768 * A293235 A066803 A089608 Adjacent sequences:  A069290 A069291 A069292 * A069294 A069295 A069296 KEYWORD nonn AUTHOR Reinhard Zumkeller, Mar 14 2002 EXTENSIONS More terms from Antti Karttunen, Nov 20 2017 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.

Last modified June 19 17:16 EDT 2019. Contains 324222 sequences. (Running on oeis4.)