A115149 -id:A115149 - cp's OEIS frontend

A115140 O.g.f. inverse of Catalan A000108 o.g.f.

1, -1, -1, -2, -5, -14, -42, -132, -429, -1430, -4862, -16796, -58786, -208012, -742900, -2674440, -9694845, -35357670, -129644790, -477638700, -1767263190, -6564120420, -24466267020, -91482563640, -343059613650, -1289904147324, -4861946401452, -18367353072152

Offset: 0

Wolfdieter Lang, Jan 13 2006

Seiichi Manyama, Table of n, a(n) for n = 0..1668
Paul Barry, On a Central Transform of Integer Sequences, arXiv:2004.04577 [math.CO], 2020.
Paul Barry, Centered polygon numbers, heptagons and nonagons, and the Robbins numbers, arXiv:2104.01644 [math.CO], 2021.
Ângela Mestre and José Agapito, A Family of Riordan Group Automorphisms, J. Int. Seq., Vol. 22 (2019), Article 19.8.5.

See A034807 and A115149 for comments.

For convolutions of this sequence see A115141-A115149.

O.g.f.: 1/c(x) = 1-x*c(x) with the o.g.f. c(x):=(1-sqrt(1-4*x))/(2*x) of A000108 (Catalan numbers).
a(0) = 1, a(n) = -C(n-1), n>=1, with C(n):=A000108(n) (Catalan).
G.f.: (1 + sqrt(1-4*x))/2=U(0) where U(k)=1 - x/U(k+1) ; (continued fraction, 1-step). - Sergei N. Gladkovskii, Oct 29 2012
G.f.: 1/G(0) where G(k) = 1 - x/(x - 1/G(k+1) ); (continued fraction). - Sergei N. Gladkovskii, Dec 12 2012
G.f.: G(0), where G(k)= 2*x*(2*k+1) + k + 1 - 2*x*(k+1)*(2*k+3)/G(k+1) ; (continued fraction). - Sergei N. Gladkovskii, Jul 14 2013
D-finite with recurrence n*a(n) +2*(-2*n+3)*a(n-1)=0. a(n) = A002420(n)/2, n>0. - R. J. Mathar, Aug 09 2015
a(n) ~ -2^(2*n-2) / (sqrt(Pi)*n^(3/2)). - Vaclav Kotesovec, May 06 2021

A115141 Convolution of A115140 with itself.

Original entry on oeis.org

1, -2, -1, -2, -5, -14, -42, -132, -429, -1430, -4862, -16796, -58786, -208012, -742900, -2674440, -9694845, -35357670, -129644790, -477638700, -1767263190, -6564120420, -24466267020, -91482563640, -343059613650, -1289904147324, -4861946401452, -18367353072152

Offset: 0

Wolfdieter Lang, Jan 13 2006

This is the so-called A-sequence for the Riordan triangles A053122, A110162, A129818, A158454 and signed A158909. For the notion of Z- and A-sequences for Riordan arrays see the W. Lang link under A006232 with details and references. Wolfdieter Lang, Dec 20 2010. [Revised, Nov 13 2012, Nov 22 2012 and Oct 22 2019]

a(n)*(-1)^n is the A-sequence for the Riordan triangle A111125. - Wolfdieter Lang, Jun 26 2011

			G.f. = 1 - 2*x - x^2 - 2*x^3 - 5*x^4 - 14*x^5 - 42*x^6 - 132*x^7 - 429*x^8 + ...

Vincenzo Librandi, Table of n, a(n) for n = 0..1000

Cf. A000108, A115140, A115142 - A115149.

m:=30; R:=PowerSeriesRing(Rationals(), m); Coefficients(R!( (1-2*x+Sqrt(1-4*x))/2 )); // G. C. Greubel, Feb 12 2019

a[n_] := -First[ ListConvolve[ cc = Array[ CatalanNumber, n-1, 0], cc]]; a[0] = 1; a[1] = -2; Table[a[n], {n, 0, 27}] (* Jean-François Alcover, Oct 21 2011 *)
CoefficientList[Series[(1-2*x+Sqrt[1-4*x])/2, {x, 0, 30}], x] (* G. C. Greubel, Feb 12 2019 *)

{a(n) = if( n<1, n==0, -(n==1) -binomial( 2*n-2, n-1) / n)} /* Michael Somos, Mar 28 2012 */

((1-2*x+sqrt(1-4*x))/2).series(x, 30).coefficients(x, sparse=False) # G. C. Greubel, Feb 12 2019

O.g.f.: 1/c(x)^2 = (1-x) - x*c(x) with the o.g.f. c(x) = (1-sqrt(1-4*x) )/(2*x) of A000108 (Catalan numbers).
a(0)=1, a(1)=-2, a(n) = -C(n-1), n>=2, with C(n):=A000108(n) (Catalan). The start [1, -2] is row n=2 of signed A034807 (signed Lucas polynomials). See A115149 and A034807 for comments.
The convolution inverse is A000108(x)^2. - Michael Somos, Mar 28 2012
REVERT transform is A069271. - Michael Somos, Mar 28 2012
EULER transform of -A060165. - Michael Somos, Mar 28 2012
D-finite with recurrence: n*a(n) +2*(-2*n+3)*a(n-1)=0. - R. J. Mathar, Feb 21 2020

A115142 Third convolution of A115140.

Original entry on oeis.org

1, -3, 0, -1, -3, -9, -28, -90, -297, -1001, -3432, -11934, -41990, -149226, -534888, -1931540, -7020405, -25662825, -94287120, -347993910, -1289624490, -4796857230, -17902146600, -67016296620, -251577050010, -946844533674, -3572042254128, -13505406670700

Offset: 0

Wolfdieter Lang, Jan 13 2006

Seiichi Manyama, Table of n, a(n) for n = 0..1668

Cf. A000108, A000245, A071724.

Cf. A115139, A115140, A115141, A115143 - A115149.

m:=30; R:=PowerSeriesRing(Rationals(), m); Coefficients(R!( (2*(1-2*x)-(1-x)*(1-Sqrt(1-4*x)))/2 )); // G. C. Greubel, Feb 12 2019

CoefficientList[Series[(2*(1-2*x)-(1-x)*(1-Sqrt[1-4*x]))/2, {x, 0, 30}], x] (* G. C. Greubel, Feb 12 2019 *)

my(x='x+O('x^30)); Vec((2*(1-2*x)-(1-x)*(1-sqrt(1-4*x)))/2) \\ G. C. Greubel, Feb 12 2019

((2*(1-2*x)-(1-x)*(1-sqrt(1-4*x)))/2).series(x, 30).coefficients(x, sparse=False) # G. C. Greubel, Feb 12 2019

O.g.f.: 1/c(x)^3 = P(4, x) - x*P(3, x)*c(x) with the o.g.f. c(x):=(1-sqrt(1-4*x))/(2*x) of A000108 (Catalan numbers) and the polynomials P(n, x) defined in A115139. Here P(4, x)=1-2*x and P(3, x)=1-x.
a(n) = -C3(n-3), n >= 3, with C3(n):= A000245(n+1) (third convolution of Catalan numbers). a(0)=1, a(1)=-3, a(2)=0. [1, -3] is the row n=3 of signed A034807 (signed Lucas polynomials). See A115149 and A034807 for comments.
D-finite with recurrence +n*(n-3)*a(n) -2*(n-2)*(2*n-5)*a(n-1)=0. - R. J. Mathar, Sep 23 2021
O.g.f.: (1/8)*(1 + sqrt(1 - 4*x))^3 = ( hypergeom([-1/4, -3/4], [-1/2], 4*x) )^2. - Peter Bala, Mar 04 2022

A115143 a(n) = -4binomial(2n-5, n-4)/n for n > 0 and a(0) = 1.

Original entry on oeis.org

1, -4, 2, 0, -1, -4, -14, -48, -165, -572, -2002, -7072, -25194, -90440, -326876, -1188640, -4345965, -15967980, -58929450, -218349120, -811985790, -3029594040, -11338026180, -42550029600, -160094486370, -603784920024, -2282138106804, -8643460269248, -32798844771700

Offset: 0

Wolfdieter Lang, Jan 13 2006

Previous name: Fourth convolution of A115140.
a(n+4) := - convolution ( A000108(n+1) ), n=0,1,... - Tilman Neumann, Jan 05 2009
Self-convolution of A115141. - R. J. Mathar, Sep 26 2012

Seiichi Manyama, Table of n, a(n) for n = 0..1669

Cf. A115139 - A115142, A115144 - A115149, A099376, A000108.

[1,-4,2] cat [-4*Binomial(2*n-5,n-4)/n: n in [3..30]]; // G. C. Greubel, Feb 12 2019

A115143 := n -> `if`(n=0, 1, -4*binomial(2*n-5,n-4)/n):
seq(A115143(n), n=0..28); # Peter Luschny, Feb 27 2017
A115143List := proc(m) local A, P, n; A := [1,-4,2,0]; P := [-1,0];
for n from 1 to m - 2 do P := ListTools:-PartialSums([op(P), P[-1]]);
A := [op(A), P[-1]] od; A end: A115143List(27); # Peter Luschny, Mar 26 2022

Join[{1},Table[-4*Binomial[2n-5,n-4]/n,{n,30}]] (* Harvey P. Dale, Dec 01 2017 *)
CoefficientList[Series[(1-4*x+2*x^2+(1-2*x)*Sqrt[1-4*x])/2, {x,0,30}], x] (* G. C. Greubel, Feb 12 2019 *)

my(x='x+O('x^30)); Vec((1-4*x+2*x^2 +(1-2*x)*sqrt(1-4*x))/2) \\ G. C. Greubel, Feb 12 2019

[1,-4,2] + [-4*binomial(2*n-5,n-4)/n for n in (3..30)] # G. C. Greubel, Feb 12 2019

O.g.f.: 1/c(x)^4 = P(5, x) - x*P(4, x)*c(x) with the o.g.f. c(x) := (1-sqrt(1-4*x))/(2*x) of A000108 (Catalan numbers) and the polynomials P(n, x) defined in A115139. Here P(5, x) = 1-3*x+x^2 and P(4, x) = 1-2*x.
a(n) = -C4(n-4), n>=4, with C4(n) := A002057(n) (fourth convolution of Catalan numbers). a(0)=1, a(1)=-4, a(2)=2, a(3)=0. [1, -4, 2] is row n=4 of signed A034807 (signed Lucas polynomials). See A115149 and A034807 for comments.
E.g.f.: 1 - 3*x + 1/2*x^2 - x*Q(0), where Q(k)= 1 - 2*x/(k+2 - (k+2)*(2*k+1)/(2*k+1 - (k+2)/Q(k+1))); (continued fraction). - Sergei N. Gladkovskii, Apr 28 2013
D-finite with recurrence n*(n-4)*a(n) -2*(2*n-5)*(n-3)*a(n-1)=0. - R. J. Mathar, Sep 15 2024

Simpler name from Peter Luschny, Feb 27 2017

A115144 Fifth convolution of A115140.

Original entry on oeis.org

1, -5, 5, 0, 0, -1, -5, -20, -75, -275, -1001, -3640, -13260, -48450, -177650, -653752, -2414425, -8947575, -33266625, -124062000, -463991880, -1739969550, -6541168950, -24647883000, -93078189750, -352207870014, -1335293573130, -5071418015120, -19293438101000

Offset: 0

Wolfdieter Lang, Jan 13 2006

Seiichi Manyama, Table of n, a(n) for n = 0..1669

Cf. A000344, A115139 - A115143, A115145 - A115149.

m:=30; R:=PowerSeriesRing(Rationals(), m); Coefficients(R!( (1-5*x+5*x^2 +(1-3*x+x^2)*Sqrt(1-4*x))/2 )); // G. C. Greubel, Feb 12 2019

CoefficientList[Series[(1-5*x+5*x^2 +(1-3*x+x^2)*Sqrt[1-4*x])/2, {x, 0, 30}], x] (* G. C. Greubel, Feb 12 2019 *)

my(x='x+O('x^30)); Vec((1-5*x+5*x^2 +(1-3*x+x^2)*sqrt(1-4*x))/2) \\ G. C. Greubel, Feb 12 2019

((1-5*x+5*x^2 +(1-3*x+x^2)*sqrt(1-4*x))/2).series(x, 30).coefficients(x, sparse=False) # G. C. Greubel, Feb 12 2019

O.g.f.: 1/c(x)^5 = P(6, x) - x*P(5, x)*c(x) with the o.g.f. c(x) = (1-sqrt(1-4*x))/(2*x) of A000108 (Catalan numbers) and the polynomials P(n, x) defined in A115139. Here P(6, x)=1-4*x+3*x^2 and P(5, x)=1-3*x+x^2.
a(n) = -C5(n-5), n>=5, with C5(n) = A000344(n+2) (fifth convolution of Catalan numbers). a(0)=1, a(1)=-5, a(2)=5, a(3)=0=a(4). [1, -5, 5] is row n=5 of signed A034807 (signed Lucas polynomials). See A115149 and A034807 for comments.
D-finite with recurrence +n*(n-5)*a(n) -2*(n-3)*(2*n-7)*a(n-1)=0. - R. J. Mathar, Sep 23 2021
From Peter Bala, Mar 05 2023: (Start)
a(n) = binomial(2*n - 6, n) - binomial(2*n - 6, n + 1).
a(n) = = -5/(n - 5)*binomial(2*n - 6, n) for n != 5.
a(n) = -A000344(n-3) for n >= 5. (End)

A115147 Eighth convolution of A115140.

Original entry on oeis.org

1, -8, 20, -16, 2, 0, 0, 0, -1, -8, -44, -208, -910, -3808, -15504, -62016, -245157, -961400, -3749460, -14567280, -56448210, -218349120, -843621600, -3257112960, -12570420330, -48507033744, -187187399448, -722477682080, -2789279908316, -10772391370048

Offset: 0

Wolfdieter Lang, Jan 13 2006

Seiichi Manyama, Table of n, a(n) for n = 0..1670

Cf. A115139 - A115146, A115148, A115149.

m:=30; R:=PowerSeriesRing(Rationals(), m); Coefficients(R!( (1-8*x+20*x^2-16*x^3+2*x^4 +(1-6*x+10*x^2-4*x^3)*Sqrt(1-4*x))/2 )); // G. C. Greubel, Feb 12 2019

CoefficientList[Series[(1-8*x+20*x^2-16*x^3+2*x^4 +(1-6*x+10*x^2-4*x^3) *Sqrt[1-4*x])/2, {x, 0, 30}], x] (* G. C. Greubel, Feb 12 2019 *)

my(x='x+O('x^30)); Vec((1-8*x+20*x^2-16*x^3+2*x^4 +(1-6*x+10*x^2 -4*x^3)*sqrt(1-4*x))/2) \\ G. C. Greubel, Feb 12 2019

((1-8*x+20*x^2-16*x^3+2*x^4 +(1-6*x+10*x^2-4*x^3)*sqrt(1-4*x))/2 ).series(x, 30).coefficients(x, sparse=False) # G. C. Greubel, Feb 12 2019

O.g.f.: 1/c(x)^8 = P(9, x) - x*P(8, x)*c(x) with the o.g.f. c(x):=(1-sqrt(1-4*x))/(2*x) of A000108 (Catalan numbers) and the polynomials P(n, x) defined in A115139. Here P(9, x)= 1-7*x+15*x^2-10*x^3+x^4 and P(8, x)=1-6*x+10*x^2-4*x^3.

a(n) = -C8(n-8), n>=8, with C8(n) = A003518(n+3) (eighth convolution of Catalan numbers). a(0)=1, a(1)=-8, a(2)=30, a(3)=-16, a(4)=2, a(5)=a(6)=a(7)=0. [1, -8, 20, -16, 2] is row n=8 of signed A034807 (signed Lucas polynomials). See A115149 and A034807 for comments.

A115148 Ninth convolution of A115140.

Original entry on oeis.org

1, -9, 27, -30, 9, 0, 0, 0, 0, -1, -9, -54, -273, -1260, -5508, -23256, -95931, -389367, -1562275, -6216210, -24582285, -96768360, -379629720, -1485507600, -5801732460, -22626756594, -88152205554, -343176898988, -1335293573130, -5193831553416

Offset: 0

Wolfdieter Lang, Jan 13 2006

Seiichi Manyama, Table of n, a(n) for n = 0..1671

Cf. A115139 - A115147, A115149.

m:=30; R:=PowerSeriesRing(Rationals(), m); Coefficients(R!( (1-9*x+27*x^2-30*x^3+9*x^4 +(1-7*x+15*x^2-10*x^3+x^4)*Sqrt(1-4*x))/2 )); // G. C. Greubel, Feb 12 2019

CoefficientList[Series[(1-9*x+27*x^2-30*x^3+9*x^4 +(1-7*x+15*x^2-10*x^3 +x^4)*Sqrt[1-4*x])/2, {x, 0, 30}], x] (* G. C. Greubel, Feb 12 2019 *)

my(x='x+O('x^30)); Vec((1-9*x+27*x^2-30*x^3+9*x^4 +(1-7*x+15*x^2 -10*x^3+x^4)*sqrt(1-4*x))/2) \\ G. C. Greubel, Feb 12 2019

((1-9*x+27*x^2-30*x^3+9*x^4 +(1-7*x+15*x^2-10*x^3+x^4) *sqrt(1-4*x))/2).series(x, 30).coefficients(x, sparse=False) # G. C. Greubel, Feb 12 2019

O.g.f.: 1/c(x)^9 = P(10, x) - x*P(9, x)*c(x) with the o.g.f. c(x):=(1-sqrt(1-4*x))/(2*x) of A000108 (Catalan numbers) and the polynomials P(n, x) defined in A115139. Here P(10, x)=1-8*x+21*x^2-20*x^3+5*x^4 and P(9, x)=1-7*x+15*x^2-10*x^3+x^4.

a(n) = -C9(n-9), n>=9, with C9(n) = A001392(n+4) (eighth convolution of Catalan numbers). a(0)=1, a(1)=-9, a(2)=27, a(3)=-30, a(4)=9, a(5)=a(6)=a(7)=a(8)=0. [1, -9, 27, -30, 9] is row n=9 of signed A034807 (signed Lucas polynomials). See A115149 and A034807 for comments.

A115145 Sixth convolution of A115140.

Original entry on oeis.org

1, -6, 9, -2, 0, 0, -1, -6, -27, -110, -429, -1638, -6188, -23256, -87210, -326876, -1225785, -4601610, -17298645, -65132550, -245642760, -927983760, -3511574910, -13309856820, -50528160150, -192113383644, -731508653106, -2789279908316, -10649977831752, -40715807302800

Offset: 0

Wolfdieter Lang, Jan 13 2006

Seiichi Manyama, Table of n, a(n) for n = 0..1669

Cf. A115139, A115140, A115141, A115142, A115143.

Cf. A115144, A115146, A115147, A115148, A115149.

m:=30; R:=PowerSeriesRing(Rationals(), m); Coefficients(R!( (1-6*x+9*x^2-2*x^3 +(1-4*x+3*x^2)*Sqrt(1-4*x))/2 )); // G. C. Greubel, Feb 12 2019

CoefficientList[Series[(1-6*x+9*x^2-2*x^3 +(1-4*x+3*x^2)*Sqrt[1-4*x])/2, {x, 0, 30}], x] (* G. C. Greubel, Feb 12 2019 *)

my(x='x+O('x^30)); Vec((1-6*x+9*x^2-2*x^3 +(1-4*x+3*x^2) *sqrt(1-4*x))/2) \\ G. C. Greubel, Feb 12 2019

((1-6*x+9*x^2-2*x^3 +(1-4*x+3*x^2)*sqrt(1-4*x))/2).series(x, 30).coefficients(x, sparse=False) # G. C. Greubel, Feb 12 2019

O.g.f.: 1/c(x)^6 = P(7, x) - x*P(6, x)*c(x) with the o.g.f. c(x):=(1-sqrt(1-4*x))/(2*x) of A000108 (Catalan numbers) and the polynomials P(n, x) defined in A115139. Here P(7, x)=1-5*x+6*x^2-x^3 and P(6, x) = 1-4*x+3*x^2.
a(n) = -C6(n-6), n>=6, with C6(n) = A003517(n+2) (sixth convolution of Catalan numbers). a(0)=1, a(1)=-6, a(2)=9, a(3)=-2, a(4)=0=a(5). [1, -6, 9, -2] is row n=6 of signed A034807 (signed Lucas polynomials). See A115149 and A034807 for comments.
D-finite with recurrence +n*(n-6)*a(n) -2*(2*n-7)*(n-4)*a(n-1)=0. - R. J. Mathar, Sep 23 2021

A115146 Seventh convolution of A115140.

Original entry on oeis.org

1, -7, 14, -7, 0, 0, 0, -1, -7, -35, -154, -637, -2548, -9996, -38760, -149226, -572033, -2187185, -8351070, -31865925, -121580760, -463991880, -1771605360, -6768687870, -25880277150, -99035193894, -379300783092, -1453986335186, -5578559816632, -21422369201800

Offset: 0

Wolfdieter Lang, Jan 13 2006

Seiichi Manyama, Table of n, a(n) for n = 0..1670

Cf. A115139, A115140, A115141, A115142, A115143.

Cf. A115144, A115145, A115147, A115148, A115149.

m:=30; R:=PowerSeriesRing(Rationals(), m); Coefficients(R!( (1-7*x+14*x^2-7*x^3 +(1-5*x+6*x^2-x^3)*Sqrt(1-4*x))/2 )); // G. C. Greubel, Feb 12 2019

CoefficientList[Series[(1-7*x+14*x^2-7*x^3 +(1-5*x+6*x^2-x^3) *Sqrt[1-4*x])/2, {x, 0, 30}], x] (* G. C. Greubel, Feb 12 2019 *)

my(x='x+O('x^30)); Vec((1-7*x+14*x^2-7*x^3 +(1-5*x+6*x^2-x^3) *sqrt(1-4*x))/2) \\ G. C. Greubel, Feb 12 2019

((1-7*x+14*x^2-7*x^3 +(1-5*x+6*x^2-x^3)*sqrt(1-4*x))/2 ).series(x, 30).coefficients(x, sparse=False) # G. C. Greubel, Feb 12 2019

O.g.f.: 1/c(x)^7 = P(8, x) - x*P(7, x)*c(x) with the o.g.f. c(x):=(1-sqrt(1-4*x))/(2*x) of A000108 (Catalan numbers) and the polynomials P(n, x) defined in A115139. Here P(8, x)=1-6*x+10*x^2-4*x^3 and P(7, x)=1-5*x+6*x^2-x^3.
a(n) = -C7(n-7), n>=7, with C7(n):=A000588(n+3) (seventh convolution of Catalan numbers). a(0)=1, a(1)=-7, a(2)=14, a(3)=-7, a(4)=a(5)=a(6)=0. [1, -7, 14, -7] is row n=7 of signed A034807 (signed Lucas polynomials). See A115149 and A034807 for comments.
D-finite with recurrence n*(n-7)*a(n) -2*(n-4)*(2*n-9)*a(n-1)=0. - R. J. Mathar, Sep 15 2024

cp's OEIS Frontend

A115140 O.g.f. inverse of Catalan A000108 o.g.f.

Views

Author

Keywords

Links

Crossrefs

Formula

A115141 Convolution of A115140 with itself.

Views

Author

Keywords

Comments

Examples

Links

Crossrefs

Programs

Magma

Mathematica

PARI

Sage

Formula

A115142 Third convolution of A115140.

Views

Author

Keywords

Links

Crossrefs

Programs

Magma

Mathematica

PARI

Sage

Formula

A115143 a(n) = -4*binomial(2*n-5, n-4)/n for n > 0 and a(0) = 1.

Views

Author

Keywords

Comments

Links

Crossrefs

Programs

Magma

Maple

Mathematica

PARI

Sage

Formula

Extensions

A115144 Fifth convolution of A115140.

Views

Author

Keywords

Links

Crossrefs

Programs

Magma

Mathematica

PARI

Sage

Formula

A115147 Eighth convolution of A115140.

Views

Author

Keywords

Links

Crossrefs

Programs

Magma

Mathematica

PARI

Sage

Formula

A115148 Ninth convolution of A115140.

Views

Author

Keywords

Links

Crossrefs

Programs

A115143 a(n) = -4binomial(2n-5, n-4)/n for n > 0 and a(0) = 1.