|
%I #18 Sep 08 2022 08:44:54
%S 1,1,4,5,24,29,111,140,4591,4731,18784,23515,112844,136359,521921,
%T 658280,21586881,22245161,88322364,110567525,530592464,641159989,
%U 2454072431,3095232420,101501509871,104596742291,415291736744,519888479035,2494845652884
%N Denominators of continued fraction convergents to sqrt(282).
%H Vincenzo Librandi, <a href="/A041531/b041531.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, 4702, 0, 0, 0, 0, 0, 0, 0, -1).
%F G.f.: -(x^2-x-1)*(x^4+5*x^2+1)*(x^8+28*x^4+1) / (x^16-4702*x^8+1). - _Colin Barker_, Nov 18 2013
%F a(n) = 4702*a(n-8) - a(n-16) for n>15. - _Vincenzo Librandi_, Dec 19 2013
%t Denominator[Convergents[Sqrt[282], 30]] (* _Vincenzo Librandi_, Dec 19 2013 *)
%o (Magma) I:=[1,1,4,5,24,29,111,140,4591,4731,18784,23515, 112844,136359,521921,658280]; [n le 16 select I[n] else 4702*Self(n-8)-Self(n-16): n in [1..40]]; // _Vincenzo Librandi_, Dec 19 2013
%Y Cf. A041530, A040265.
%K nonn,frac,easy
%O 0,3
%A _N. J. A. Sloane_.
%E More terms from _Colin Barker_, Nov 18 2013
|
