login
The OEIS is supported by the many generous donors to the OEIS Foundation.

 

Logo
Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A110308 Expansion of -x*(2+x)/((1+x+x^2)*(1+5*x+x^2)). 5
0, -2, 11, -52, 247, -1182, 5664, -27140, 130037, -623044, 2985181, -14302860, 68529120, -328342742, 1573184591, -7537580212, 36114716467, -173036002122, 829065294144, -3972290468600, 19032387048857, -91189644775684, 436915836829561, -2093389539372120 (list; graph; refs; listen; history; text; internal format)
OFFSET
0,2
LINKS
FORMULA
a(n+2) = - 5*a(n+1) - a(n) - A099837(n+2).
a(n) = -6*a(n-1) - 7*a(n-2) - 6*a(n-3) - a(n-4) for n>3. - Colin Barker, Apr 30 2019
a(n) = (1/4)*(2*U(n, -5/2) + U(n-1, -5/2) - 2*U(n, -1/2) - U(n-1, -1/2)), where U(n, x) = ChebyshevU(n, x). - G. C. Greubel, Jan 03 2023
MAPLE
seriestolist(series(-x*(2+x)/((x^2+x+1)*(x^2+5*x+1)), x=0, 25));
MATHEMATICA
LinearRecurrence[{-6, -7, -6, -1}, {0, -2, 11, -52}, 40] (* G. C. Greubel, Jan 03 2023 *)
PROG
(PARI) concat(0, Vec(-x*(2+x)/((1+x+x^2)*(1+5*x+x^2)) + O(x^25))) \\ Colin Barker, Apr 30 2019
(Magma) R<x>:=PowerSeriesRing(Integers(), 40); [0] cat Coefficients(R!( -x*(2+x)/((1+x+x^2)*(1+5*x+x^2)) )); // G. C. Greubel, Jan 03 2023
(SageMath)
def U(n, x): return chebyshev_U(n, x)
def A110308(n): return (1/4)*(2*U(n, -5/2) +U(n-1, -5/2) -2*U(n, -1/2) -U(n-1, -1/2))
[A110308(n) for n in range(41)] # G. C. Greubel, Jan 03 2023
CROSSREFS
Sequence in context: A026986 A181290 A026996 * A027201 A026933 A346925
KEYWORD
easy,sign
AUTHOR
Creighton Dement, Jul 19 2005
STATUS
approved

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Style Sheet | Transforms | Superseeker | Recents
The OEIS Community | Maintained by The OEIS Foundation Inc.

License Agreements, Terms of Use, Privacy Policy. .

Last modified March 29 08:01 EDT 2024. Contains 371265 sequences. (Running on oeis4.)