|
%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
|
