This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.
%I A041916 #19 Jul 09 2025 01:54:18 %S A041916 21,22,219,241,10341,10582,105579,116161,4984341,5100502,50888859, %T A041916 55989361,2402442021,2458431382,24528324459,26986755841,1157972069781, %U A041916 1184958825622,11822601500379,13007560326001 %N A041916 Numerators of continued fraction convergents to sqrt(480). %H A041916 Vincenzo Librandi, <a href="/A041916/b041916.txt">Table of n, a(n) for n = 0..200</a> %H A041916 <a href="/index/Rec">Index entries for linear recurrences with constant coefficients</a>, signature (0,0,0,482,0,0,0,-1). %F A041916 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 A041916 Numerator[Convergents[Sqrt[480],30]] (* _Harvey P. Dale_, Aug 14 2012 *) %t A041916 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 A041916 Cf. A041917. %K A041916 nonn,cofr,easy,frac,less %O A041916 0,1 %A A041916 _N. J. A. Sloane_