|
| |
|
|
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; internal format)
|
|
|
|
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
| Cf. A135781, A135782.
Sequence in context: A081738 A043049 A135465 * A135406 A066825 A014563
Adjacent sequences: A135780 A135781 A135782 * A135784 A135785 A135786
|
|
|
KEYWORD
| nonn
|
|
|
AUTHOR
| Artur Jasinski (grafix(AT)csl.pl), Nov 29 2007
|
| |
|
|
