|
|
A041539
|
|
Denominators of continued fraction convergents to sqrt(286).
|
|
2
|
|
|
1, 1, 11, 34, 113, 260, 893, 2939, 30283, 33222, 1093387, 1126609, 12359477, 38205040, 126974597, 292154234, 1003437299, 3302466131, 34028098609, 37330564740, 1228606170289, 1265936735029, 13887973520579, 42929857296766, 142677545410877, 328284948118520
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
0,3
|
|
LINKS
|
Vincenzo Librandi, Table of n, a(n) for n = 0..200
Index entries for linear recurrences with constant coefficients, signature (0,0,0,0,0,0,0,0,0,1123670,0,0,0,0,0,0,0,0,0,-1).
|
|
FORMULA
|
G.f.: -(x^18 -x^17 +11*x^16 -34*x^15 +113*x^14 -260*x^13 +893*x^12 -2939*x^11 +30283*x^10 -33222*x^9 -30283*x^8 -2939*x^7 -893*x^6 -260*x^5 -113*x^4 -34*x^3 -11*x^2 -x -1) / (x^20 -1123670*x^10 +1). - Colin Barker, Nov 18 2013
a(n) = 1123670*a(n-10) - a(n-20) for n>19. - Vincenzo Librandi, Dec 19 2013
|
|
MATHEMATICA
|
Denominator[Convergents[Sqrt[286], 30]] (* Vincenzo Librandi, Dec 19 2013 *)
|
|
PROG
|
(MAGMA) I:=[1, 1, 11, 34, 113, 260, 893, 2939, 30283, 33222, 1093387, 1126609, 12359477, 38205040, 126974597, 292154234, 1003437299, 3302466131, 34028098609, 37330564740]; [n le 20 select I[n] else 1123670*Self(n-10)-Self(n-20): n in [1..40]]; // Vincenzo Librandi, Dec 19 2013
|
|
CROSSREFS
|
Cf. A041538, A040269.
Sequence in context: A211014 A103661 A300418 * A233933 A041232 A050287
Adjacent sequences: A041536 A041537 A041538 * A041540 A041541 A041542
|
|
KEYWORD
|
nonn,frac,easy
|
|
AUTHOR
|
N. J. A. Sloane.
|
|
EXTENSIONS
|
More terms from Colin Barker, Nov 18 2013
|
|
STATUS
|
approved
|
|
|
|