|
|
A135783
|
|
Numbers of the form 3x y^2+x^3 (where x,y are positive integers).
|
|
0
|
|
|
4, 13, 14, 28, 32, 36, 49, 62, 63, 76, 104, 108, 109, 112, 140, 148, 158, 171, 172, 185, 193, 224, 234, 244, 252, 256, 260, 288, 301, 302, 351, 364, 365, 378, 392, 427, 433, 468, 494, 496, 500, 504, 508, 532, 536, 589, 603, 608, 652, 665, 666, 676, 679, 728
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
LINKS
|
|
|
MATHEMATICA
|
a = {}; Do[Do[w = 3x y^2 + x^3; If[(w > 0) && w < 3000, AppendTo[a, w]], {x, 1, 1000}], {y, 1, 1000}]; Union[a]
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|