Location via proxy:   [ UP ]  
[Report a bug]   [Manage cookies]                
A155473
Numbers of the form x^3+y^5, with x,y>0 and x<>y.
0
9, 28, 33, 59, 65, 96, 126, 157, 217, 244, 248, 251, 307, 344, 368, 375, 459, 513, 544, 586, 730, 755, 761, 972, 1001, 1025, 1032, 1032, 1051, 1149, 1240, 1243, 1332, 1363, 1367, 1536, 1574, 1729, 1753, 1760, 1971, 2024, 2198, 2229, 2355, 2440, 2745, 2752
OFFSET
1,1
COMMENTS
Numbers with more than one of these representations are repeated for each of them.
This concerns 1032 = 2^3+4^5 = 10^3+2^5 or 9504 = 12^3+6^5 = 21^3+3^5, for example (see A035046).
EXAMPLE
59=3^3+2^5, 157=5^3+2^5, 513=8^3+1^5, 586=7^3+3^5, ...
MATHEMATICA
lst={}; Do[Do[Do[If[x!=y, a=x^3+y^5; If[a>n, Break[]]; If[a==n, AppendTo[lst, n]]], {y, 5!}], {x, 5!}], {n, 7!}]; lst
KEYWORD
nonn
AUTHOR
EXTENSIONS
Edited by R. J. Mathar, Mar 02 2009
STATUS
approved