|
|
A041261
|
|
Denominators of continued fraction convergents to sqrt(142).
|
|
2
|
|
|
1, 1, 11, 12, 275, 287, 3145, 3432, 78649, 82081, 899459, 981540, 22493339, 23474879, 257242129, 280717008, 6433016305, 6713733313, 73570349435, 80284082748, 1839820169891, 1920104252639, 21040862696281, 22960966948920, 526182135572521, 549143102521441
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
0,3
|
|
LINKS
|
|
|
FORMULA
|
G.f.: (1 +x +11*x^2 +12*x^3 -11*x^4 +x^5 -x^6)/(1 -286*x^4 +x^8). - Vincenzo Librandi, Dec 14 2013
|
|
MATHEMATICA
|
Denominator[Convergents[Sqrt[142], 30]] (* or *) CoefficientList[Series[(1 + x + 11 x^2 + 12 x^3 - 11 x^4 + x^5 - x^6)/(1 - 286 x^4 + x^8), {x, 0, 30}], x] (* Vincenzo Librandi, Dec 14 2013 *)
|
|
PROG
|
(Magma) I:=[1, 1, 11, 12, 275, 287, 3145, 3432]; [n le 8 select I[n] else 286*Self(n-4)-Self(n-8): n in [1..40]]; // Vincenzo Librandi, Dec 14 2013
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn,frac,easy
|
|
AUTHOR
|
|
|
EXTENSIONS
|
|
|
STATUS
|
approved
|
|
|
|