%I #16 Sep 08 2022 08:45:46
%S 1,11,122,1362,15284,172204,1946248,22048968,250247056,2844142256,
%T 32358633632,368446731552,4197788535104,47847991009984,
%U 545576543759488,6222427756211328,70982053835796736,809843156607224576
%N a(n) = 20*a(n-1) - 98*a(n-2) for n > 1; a(0) = 1, a(1) = 11.
%C Binomial transform of A163461. Tenth binomial transform of A016116.
%H Vincenzo Librandi, <a href="/A163462/b163462.txt">Table of n, a(n) for n = 0..500</a>
%H <a href="/index/Rec#order_02">Index entries for linear recurrences with constant coefficients</a>, signature (20, -98).
%F a(n) = ((2+sqrt(2))*(10+sqrt(2))^n + (2-sqrt(2))*(10-sqrt(2))^n)/4.
%F G.f.: (1-9*x)/(1-20*x+98*x^2).
%F E.g.f.: (1/2)*exp(10*x)*( 2*cosh(sqrt(2)*x) + sqrt(2)*sinh(sqrt(2)*x) ). - _G. C. Greubel_, Dec 25 2016
%t LinearRecurrence[{20,-98},{1,11},30] (* _Harvey P. Dale_, Dec 04 2011 *)
%t CoefficientList[Series[(1 - 9 x)/(1 - 20 x + 98 x^2), {x, 0, 17}], x] (* _Michael De Vlieger_, Dec 25 2016 *)
%o (Magma) [ n le 2 select 10*n-9 else 20*Self(n-1)-98*Self(n-2): n in [1..18] ];
%o (PARI) Vec((1-9*x)/(1-20*x+98*x^2) + O(x^50)) \\ _G. C. Greubel_, Dec 25 2016
%Y Cf. A163461, A016116 (powers of 2 doubled up).
%K nonn
%O 0,2
%A _Klaus Brockhaus_, Jul 28 2009
|