login
A041926
Numerators of continued fraction convergents to sqrt(486).
2
22, 485, 21362, 470449, 20721118, 456335045, 20099463098, 442644523201, 19496458483942, 429364731169925, 18911544629960642, 416483346590304049, 18344178794603338798, 403988416827863757605, 17793834519220608673418
OFFSET
0,1
FORMULA
G.f.: (22 + 485*x + 22*x^2 - x^3)/(1 - 970*x^2 + x^4). - Vincenzo Librandi, Nov 12 2013
a(n) = 970*a(n-2) - a(n-4). - Vincenzo Librandi, Nov 12 2013
MATHEMATICA
Numerator[Convergents[Sqrt[486], 30]] (* or *) CoefficientList[Series[(22 + 485 x + 22 x^2 - x^3)/(1 - 970 x^2 + x^4), {x, 0, 30}], x] (* Vincenzo Librandi, Nov 12 2013 *)
PROG
(Magma) I:=[22, 485, 21362, 470449]; [n le 4 select I[n] else 970*Self(n-2)-Self(n-4): n in [1..25]]; // Vincenzo Librandi, Nov 12 2013
CROSSREFS
Cf. A041927.
Sequence in context: A009966 A285876 A041221 * A230350 A180780 A121904
KEYWORD
nonn,cofr,frac,easy,less
AUTHOR
STATUS
approved