%I #17 Jun 13 2015 00:49:37
%S 21,22,219,241,10341,10582,105579,116161,4984341,5100502,50888859,
%T 55989361,2402442021,2458431382,24528324459,26986755841,1157972069781,
%U 1184958825622,11822601500379,13007560326001
%N Numerators of continued fraction convergents to sqrt(480).
%H Vincenzo Librandi, <a href="/A041916/b041916.txt">Table of n, a(n) for n = 0..200</a>
%H <a href="/index/Rec">Index entries for linear recurrences with constant coefficients</a>, signature (0,0,0,482,0,0,0,-1).
%F a(n) = 482*a(n-4)-a(n-8). G.f.: -(x^7-21*x^6+22*x^5-219*x^4-241*x^3-219*x^2-22*x-21)/((x^4-22*x^2+1)*(x^4+22*x^2+1)). [_Colin Barker_, Jul 16 2012]
%t Numerator[Convergents[Sqrt[480],30]] (* _Harvey P. Dale_, Aug 14 2012 *)
%t CoefficientList[Series[- (x^7 - 21 x^6 + 22 x^5 - 219 x^4 - 241 x^3 - 219 x^2 - 22 x - 21)/((x^4 - 22 x^2 + 1) (x^4 + 22 x^2 + 1)), {x, 0, 30}], x] (* _Vincenzo Librandi_, Oct 27 2013 *)
%Y Cf. A041917.
%K nonn,cofr,easy,frac,less
%O 0,1
%A _N. J. A. Sloane_.