|
%I #19 Mar 18 2017 12:40:38
%S 18,19,37,56,485,541,1026,1567,57438,59005,116443,175448,1520027,
%T 1695475,3215502,4910977,180010674,184921651,364932325,549853976,
%U 4763764133,5313618109,10077382242,15391000351,564153394878,579544395229,1143697790107,1723242185336
%N Numerators of continued fraction convergents to sqrt(348).
%H Vincenzo Librandi, <a href="/A041658/b041658.txt">Table of n, a(n) for n = 0..200</a>
%H <a href="/index/Rec#order_16">Index entries for linear recurrences with constant coefficients</a>, signature (0, 0, 0, 0, 0, 0, 0, 3134, 0, 0, 0, 0, 0, 0, 0, -1).
%F G.f.: -(x^15 -18*x^14 +19*x^13 -37*x^12 +56*x^11 -485*x^10 +541*x^9 -1026*x^8 -1567*x^7 -1026*x^6 -541*x^5 -485*x^4 -56*x^3 -37*x^2 -19*x -18) / ((x^8 -56*x^4 +1)*(x^8 +56*x^4 +1)). - _Colin Barker_, Dec 28 2013
%t Numerator[Convergents[Sqrt[348], 30]] (* _Harvey P. Dale_, Apr 30 2012 *)
%t LinearRecurrence[{0, 0, 0, 0, 0, 0, 0, 3134, 0, 0, 0, 0, 0, 0, 0, -1}, {18, 19, 37, 56, 485, 541, 1026, 1567, 57438, 59005, 116443, 175448, 1520027, 1695475, 3215502, 4910977}, 30] (* _Bruno Berselli_, Nov 06 2013 *)
%Y Cf. A041659, A040329.
%K nonn,frac,easy
%O 0,1
%A _N. J. A. Sloane_.
%E More terms from _Colin Barker_, Dec 28 2013
|
