login
Partial sums of A003325.
0

%I #7 Apr 27 2022 15:00:23

%S 2,11,27,55,90,144,209,281,372,498,626,759,911,1100,1317,1541,1784,

%T 2034,2314,2655,2999,3350,3720,4127,4559,5027,5540,6060,6599,7158,

%U 7734,8371,9057,9785,10515,11252,12008,12801,13655,14510,15455,16456,17464,18488

%N Partial sums of A003325.

%e a(15) = 2 + 9 + 16 + 28 + 35 + 54 + 65 + 72 + 91 + 126 + 128 + 133 + 152 + 189 + 217 = 1317.

%t Accumulate[With[{upto=2000},Select[Total/@Tuples[Range[Ceiling[Surd[ upto,3]]]^3,2],#<=upto&]]//Union] (* _Harvey P. Dale_, Apr 27 2022 *)

%Y Cf. A000578, A003325, A022555, A057903.

%K easy,nonn

%O 1,1

%A _Jonathan Vos Post_, Jun 06 2008

%E a(29)-a(44) from _Nathaniel Johnston_, Sep 26 2011