|
|
A145721
|
|
Numbers n such that there exists x in N with (x+1)^3-x^3=127*n^2.
|
|
2
|
|
|
1, 2029, 4118869, 8361302041, 16973439024361, 34456072858150789, 69945810928607077309, 141989961728999508786481, 288239552364058074229479121, 585126149309076161686333829149, 1187805794857872244165183443693349, 2411245178435331346579160704363669321
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,2
|
|
LINKS
|
|
|
FORMULA
|
a(n+2) = 2030*a(n+1)-a(n).
G.f.: -x*(x-1) / (x^2-2030*x+1). - Colin Barker, Oct 20 2014
|
|
EXAMPLE
|
a(1)=1 because 7^3-6^3=127*1^2.
|
|
MATHEMATICA
|
CoefficientList[Series[(1 - x)/(x^2 - 2030 x + 1), {x, 0, 20}], x] (* Vincenzo Librandi, Oct 20 2014 *)
|
|
PROG
|
(PARI) Vec(-x*(x-1)/(x^2-2030*x+1) + O(x^20)) \\ Colin Barker, Oct 20 2014
(Magma) I:=[1, 2029]; [n le 2 select I[n] else 2030*Self(n-1)-Self(n-2): n in [1..20]]; // Vincenzo Librandi, Oct 20 2014
|
|
CROSSREFS
|
|
|
KEYWORD
|
easy,nonn
|
|
AUTHOR
|
|
|
EXTENSIONS
|
|
|
STATUS
|
approved
|
|
|
|