login
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
OFFSET
1,1
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
Sequence in context: A239256 A043049 A135465 * A135406 A066825 A014563
KEYWORD
nonn
AUTHOR
Artur Jasinski, Nov 29 2007
STATUS
approved