# Greetings from The On-Line Encyclopedia of Integer Sequences! http://oeis.org/ Search: id:a099025 Showing 1-1 of 1 %I A099025 #28 Sep 08 2022 08:45:15 %S A099025 1,4,20,95,456,2184,10465,50140,240236,1151039,5514960,26423760, %T A099025 126603841,606595444,2906373380,13925271455,66719983896,319674648024, %U A099025 1531653256225,7338591633100,35161304909276,168467932913279,807178359657120,3867423865372320 %N A099025 Expansion of 1 / ((1+x) * (1-5*x+x^2)). %D A099025 R. C. Alperin, A nonlinear recurrence and its relations to Chebyshev polynomials, Fib. Q., 58:2 (2020), 140-142. %H A099025 Colin Barker, Table of n, a(n) for n = 0..1000 %H A099025 P. Barry, Symmetric Third-Order Recurring Sequences, Chebyshev Polynomials, and Riordan Arrays, JIS 12 (2009) 09.8.6 %H A099025 Index entries for linear recurrences with constant coefficients, signature (4,4,-1). %F A099025 a(n) = (1/7)*[A030221(n+2) - A003501(n+2) + (-1)^n]. %F A099025 a(n) = 5*a(n-1) -a(n-2) +(-1)^n, a(0)=1, a(1)=4. - _Vincenzo Librandi_, Mar 22 2011 %F A099025 G.f.: 1 / ((1 + x) * (1 - 5*x + x^2)). %F A099025 a(-3-n) = -a(n). - _Michael Somos_, Jan 25 2013 %F A099025 a(n) = (2^(-n)*(3*(-2)^n+(9-2*sqrt(21))*(5-sqrt(21))^n+(5+sqrt(21))^n*(9+2*sqrt(21))))/21. - _Colin Barker_, Nov 02 2016 %e A099025 1 + 4*x + 20*x^2 + 95*x^3 + 456*x^4 + 2184*x^5 + 10465*x^6 + ... %t A099025 CoefficientList[Series[1/((1+x)*(1-5*x+x^2)), {x,0,50}], x] (* or *) LinearRecurrence[{4,4,-1}, {1,4,20}, 30] (* _G. C. Greubel_, Dec 31 2017 *) %o A099025 (PARI) Vec(1/(1+x)/(1-5*x+x^2)+O(x^99)) \\ _Charles R Greathouse IV_, Sep 26 2012 %o A099025 (PARI) {a(n) = (3 * (-1)^n + 38 * subst( poltchebi(n), x, 5/2) - 8 * subst( poltchebi(n-1), x, 5/2)) / 21} /* _Michael Somos_, Jan 25 2013 */ %o A099025 (Magma) I:=[1, 4, 20]; [n le 3 select I[n] else 4*Self(n-1) + 4*Self(n-2) - Self(n-3): n in [1..30]]; // _G. C. Greubel_, Dec 31 2017 %Y A099025 First differences of A089927. First differences are in A003769 and A005386. Pairwise sums are in A004254. %K A099025 nonn,easy %O A099025 0,2 %A A099025 _Ralf Stephan_, Sep 26 2004 # Content is available under The OEIS End-User License Agreement: http://oeis.org/LICENSE