|
Search: id:A114803
|
|
|
| A114803 |
|
Integers when g2^3-27*g3^2=0 in cubic polynomials of the form: w^2=4*x^3-g2*x-g3. |
|
+0 1
|
|
| 1, 3, 8, 12, 27, 27, 64, 48, 125, 75, 216, 108, 343, 147, 512, 192, 729, 243, 1000, 300, 1331, 363, 1728, 432, 2197, 507, 2744, 588, 3375, 675, 4096, 768, 4913, 867
(list; graph; listen)
|
|
|
OFFSET
|
0,2
|
|
|
COMMENT
|
When the elliptic term: j=g2^3/(g2^3-27*g3^2) is singular and g2 and g3 are both integers.
|
|
FORMULA
|
a(n) = If 3*n^(2/3) is an integer then {n,3*n^(2/3)}
|
|
MATHEMATICA
|
a = Flatten[Table[If[IntegerQ[3*n^(2/3)] == True, {n, 3*n^(2/3)}, {}], {n, 1, 5000}]]
|
|
CROSSREFS
|
Sequence in context: A065970 A024463 A092954 this_sequence A083171 A058582 A027292
Adjacent sequences: A114800 A114801 A114802 this_sequence A114804 A114805 A114806
|
|
KEYWORD
|
nonn,uned
|
|
AUTHOR
|
Roger Bagula (rlbagulatftn(AT)yahoo.com), Feb 18 2006
|
|
|
Search completed in 0.002 seconds
|