|
%I #17 Feb 18 2023 10:13:08
%S 18,19,37,93,130,873,1003,2879,3882,6761,247278,254039,501317,1256673,
%T 1757990,11804613,13562603,38929819,52492422,91422241,3343693098,
%U 3435115339,6778808437,16992732213,23771540650,159621976113,183393516763,526409009639,709802526402
%N Numerators of continued fraction convergents to sqrt(345).
%H Vincenzo Librandi, <a href="/A041652/b041652.txt">Table of n, a(n) for n = 0..200</a>
%H <a href="/index/Rec#order_20">Index entries for linear recurrences with constant coefficients</a>, signature (0, 0, 0, 0, 0, 0, 0, 0, 0, 13522, 0, 0, 0, 0, 0, 0, 0, 0, 0, -1).
%F G.f.: -(x^19 -18*x^18 +19*x^17 -37*x^16 +93*x^15 -130*x^14 +873*x^13 -1003*x^12 +2879*x^11 -3882*x^10 -6761*x^9 -3882*x^8 -2879*x^7 -1003*x^6 -873*x^5 -130*x^4 -93*x^3 -37*x^2 -19*x -18) / (x^20 -13522*x^10 +1). - _Colin Barker_, Nov 10 2013
%t Numerator[Convergents[Sqrt[345], 30]] (* _Vincenzo Librandi_, Nov 06 2013 *)
%t LinearRecurrence[{0,0,0,0,0,0,0,0,0,13522,0,0,0,0,0,0,0,0,0,-1},{18,19,37,93,130,873,1003,2879,3882,6761,247278,254039,501317,1256673,1757990,11804613,13562603,38929819,52492422,91422241},30] (* _Harvey P. Dale_, Feb 18 2023 *)
%Y Cf. A041653.
%K nonn,cofr,frac,easy
%O 0,1
%A _N. J. A. Sloane_.
%E More terms from _Colin Barker_, Nov 10 2013
|
