|
%I #16 Jun 06 2021 16:06:14
%S 5,12,19,26,31,33,38,40,45,52,57,59,68,71,75,78,83,90,94,96,97,101,
%T 109,115,116,120,131,138,143,146,150,157,162,164,169,171,172,176,181,
%U 183,188,194,195,199,201,207,208,209,213,214,220,227,234,241,246,248
%N Numbers that are the sum of 5 but no fewer positive cubes.
%C This sequence is conjectured to have a finite number of terms. - _T. D. Noe_, Dec 13 2006
%H T. D. Noe, <a href="/A047704/b047704.txt">Table of n, a(n) for n=1..1000</a>
%t Select[Range[300], (pr = PowersRepresentations[#, 5, 3]; pr != {} && Count[pr, r_/; (Times @@ r) == 0] == 0)&] (* _Jean-François Alcover_, Jul 26 2011 *)
%Y Cf. A003328, A002376.
%K nonn
%O 1,1
%A Arlin Anderson (starship1(AT)gmail.com)
|
