%I #9 Jun 06 2016 14:47:21
%S 2,9,28,33,40,59,65,96,126,157,217,244,248,251,270,307,344,368,375,
%T 459,513,544,586,730,755,761,972,1001,1025,1032,1051,1088,1149,1240,
%U 1243,1332,1363,1367,1536,1574,1729,1753,1760,1971,2024,2198,2229,2355,2440
%N Numbers of the form a^5 + b^3 with a,b>0.
%H Vincenzo Librandi, <a href="/A100293/b100293.txt">Table of n, a(n) for n = 1..1000</a>
%t lst={}; Do[p=a^5+b^3; If[p<5000, AppendTo[lst, p]], {a, 64}, {b, 1024}]; Union[lst]
%o (PARI) is(n)=for(y=1,sqrtnint(n-1,5), if(ispower(n-y^5,3),return(1))); 0 \\ _Charles R Greathouse IV_, Jun 06 2016
%Y Cf. A100273 (primes of the form a^5 + b^3).
%K nonn
%O 1,1
%A _T. D. Noe_, Nov 18 2004