OFFSET
1,2
LINKS
G. C. Greubel, Table of n, a(n) for n = 1..10000
FORMULA
a(n) = Sum_{j=1..n} A079645(j).
a(n) ~ 2^(5/2)*n^(5/2)/(5*3^(3/2)) - 5*n^2/6. - Vaclav Kotesovec, Oct 13 2024
MATHEMATICA
Accumulate[Select[Range[300], Divisible[#, Floor[CubeRoot[#]]]&]] (* Harvey P. Dale, Jun 19 2023 *)
PROG
(Magma)
A079645:=[n: n in [1..500] | n mod Floor(n^(1/3)) eq 0 ];
[(&+[A079645[k]: k in [1..n]]): n in [1..100]]; // G. C. Greubel, Jul 20 2023
(SageMath)
A079645=[j for j in (1..500) if j%(floor(j^(1/3)))==0]
[A120721(n) for n in range(101)] # G. C. Greubel, Jul 20 2023
CROSSREFS
KEYWORD
nonn
AUTHOR
N. J. A. Sloane, Oct 29 2006
STATUS
approved