The OEIS Foundation is supported by donations from users of the OEIS and by a grant from the Simons Foundation.

 Hints (Greetings from The On-Line Encyclopedia of Integer Sequences!)
 A297842 a(n) = Sum_{d|n} max(d, n/d)^3. 4
 1, 16, 54, 136, 250, 486, 686, 1152, 1485, 2250, 2662, 4016, 4394, 6174, 7000, 9280, 9826, 13554, 13718, 18250, 19208, 23958, 24334, 32560, 31375, 39546, 40824, 50078, 48778, 63182, 59582, 74752, 74536, 88434, 86436, 110106, 101306, 123462, 123032, 147024 (list; graph; refs; listen; history; text; internal format)
 OFFSET 1,2 LINKS Seiichi Manyama, Table of n, a(n) for n = 1..10000 FORMULA a(n) + A297793(n) = 2*A001158(n). MATHEMATICA f[n_] := Block[{d = Divisors@ n}, Plus @@ (Max[#, n/#]^3 & /@ d)]; Array[f, 40] (* Robert G. Wilson v, Jan 07 2018 *) PROG (PARI) {a(n) = sumdiv(n, d, max(d, n/d)^3)} CROSSREFS Sum_{d|n} max(d, n/d)^k: A117003 (k=1), A297841 (k=2), this sequence (k=3), A297843 (k=4), A297844 (k=5). Cf. A001158, A297793. Sequence in context: A187104 A137741 A167690 * A172190 A122658 A224040 Adjacent sequences:  A297839 A297840 A297841 * A297843 A297844 A297845 KEYWORD nonn AUTHOR Seiichi Manyama, Jan 07 2018 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 18 15:08 EDT 2021. Contains 345120 sequences. (Running on oeis4.)