|
%I #15 Jan 11 2019 15:26:46
%S 1,1,2,13,15,28,575,603,1178,7671,8849,16520,339249,355769,695018,
%T 4525877,5220895,9746772,200156335,209903107,410059442,2670259759,
%U 3080319201,5750578960,118091898401,123842477361
%N Denominators of continued fraction convergents to sqrt(111).
%H Vincenzo Librandi, <a href="/A041201/b041201.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,0,0,590,0,0,0,0,0,-1).
%F a(n) = 590*a(n-6)-a(n-12). G.f.: -(x^2-2*x-1)*(x^4-x^3+2*x^2+x+1)*(x^4+2*x^3+5*x^2-2*x+1)/(x^12-590*x^6+1). [_Colin Barker_, Jul 19 2012]
%t Denominator[Convergents[Sqrt[111], 30]] (* _Vincenzo Librandi_, Oct 24 2013 *)
%t LinearRecurrence[{0,0,0,0,0,590,0,0,0,0,0,-1},{1,1,2,13,15,28,575,603,1178,7671,8849,16520},40] (* _Harvey P. Dale_, Jan 11 2019 *)
%Y Cf. A041200.
%K nonn,cofr,frac,easy
%O 0,3
%A _N. J. A. Sloane_.
|
