|
| |
|
|
A135781
|
|
Positive numbers of the form x^3-3x y^2 (where x,y are positive integers).
|
|
2
| |
|
|
2, 7, 16, 18, 26, 52, 54, 56, 65, 97, 110, 128, 143, 144, 154, 189, 198, 208, 250, 259, 286, 296, 297, 322, 362, 416, 432, 448, 486, 488, 495, 506, 520, 621, 686, 702, 730, 738, 740, 767, 776, 782, 793, 803, 828, 875, 880, 925, 970, 990, 1024, 1034, 1144
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 1,1
|
|
|
MATHEMATICA
| a = {}; Do[Do[w = x^3 - 3x y^2; If[(w > 0) && w < 3000, AppendTo[a, w]], {x, 1, 1000}], {y, 1, 1000}]; Union[a]
|
|
|
CROSSREFS
| Sequence in context: A120110 A047694 A129666 * A167236 A041573 A041341
Adjacent sequences: A135778 A135779 A135780 * A135782 A135783 A135784
|
|
|
KEYWORD
| nonn
|
|
|
AUTHOR
| Artur Jasinski (grafix(AT)csl.pl), Nov 29 2007
|
| |
|
|
