Location via proxy:   [ UP ]  
[Report a bug]   [Manage cookies]                
A100293
Numbers of the form a^5 + b^3 with a,b>0.
14
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,1
LINKS
MATHEMATICA
lst={}; Do[p=a^5+b^3; If[p<5000, AppendTo[lst, p]], {a, 64}, {b, 1024}]; Union[lst]
PROG
(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
CROSSREFS
Cf. A100273 (primes of the form a^5 + b^3).
Sequence in context: A090900 A357721 A155472 * A202679 A340049 A256467
KEYWORD
nonn
AUTHOR
T. D. Noe, Nov 18 2004
STATUS
approved