A100293 Numbers of the form a^5 + b^3 with a,b>0.

2, 9, 28, 33, 40, 59, 65, 96, 126, 157, 217, 244, 248, 251, 270, 307, 344, 368, 375, 459, 513, 544, 586, 730, 755, 761, 972, 1001, 1025, 1032, 1051, 1088, 1149, 1240, 1243, 1332, 1363, 1367, 1536, 1574, 1729, 1753, 1760, 1971, 2024, 2198, 2229, 2355, 2440

Offset: 1

Author

T. D. Noe, Nov 18 2004

Keywords

• nonn

Links

• Vincenzo Librandi, Table of n, a(n) for n = 1..1000

Crossrefs

Cf. A100273 (primes of the form a^5 + b^3).

Programs

Mathematica

lst={}; Do[p=a^5+b^3; If[p<5000, AppendTo[lst, p]], {a, 64}, {b, 1024}]; Union[lst]

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