cp's OEIS Frontend

This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.

Showing 1-7 of 7 results.

A115132 Partial sums of A064059.

Original entry on oeis.org

132, 561, 1562, 3564, 7204, 13392, 23388, 38892, 62148, 96063, 144342, 211640, 303732, 427702, 592152, 807432, 1085892, 1442157, 1893426, 2459796, 3164612, 4034844, 5101492, 6400020, 7970820, 9859707, 12118446, 14805312, 17985684
Offset: 0

Views

Author

Wolfdieter Lang, Jan 13 2006

Keywords

Crossrefs

Cf. A115130 (fifth column of A115127).

Programs

  • Mathematica
    LinearRecurrence[{8,-28,56,-70,56,-28,8,-1},{132,561,1562,3564,7204,13392,23388,38892},40] (* Harvey P. Dale, Jul 22 2024 *)

Formula

G.f.:(132-495*x+770*x^2-616*x^3+252*x^4-42*x^5)/(1-x)^8.
a(n)=A115127(n+6, 6), n>=1, a(0):=C(6)=132, with C(n):=A000108(n) (Catalan).

A106566 Triangle T(n,k), 0 <= k <= n, read by rows, given by [0, 1, 1, 1, 1, 1, 1, 1, ... ] DELTA [1, 0, 0, 0, 0, 0, 0, 0, ... ] where DELTA is the operator defined in A084938.

Original entry on oeis.org

1, 0, 1, 0, 1, 1, 0, 2, 2, 1, 0, 5, 5, 3, 1, 0, 14, 14, 9, 4, 1, 0, 42, 42, 28, 14, 5, 1, 0, 132, 132, 90, 48, 20, 6, 1, 0, 429, 429, 297, 165, 75, 27, 7, 1, 0, 1430, 1430, 1001, 572, 275, 110, 35, 8, 1, 0, 4862, 4862, 3432, 2002, 1001, 429, 154, 44, 9, 1
Offset: 0

Views

Author

Philippe Deléham, May 30 2005

Keywords

Comments

Catalan convolution triangle; g.f. for column k: (x*c(x))^k with c(x) g.f. for A000108 (Catalan numbers).
Riordan array (1, xc(x)), where c(x) the g.f. of A000108; inverse of Riordan array (1, x*(1-x)) (see A109466).
Diagonal sums give A132364. - Philippe Deléham, Nov 11 2007

Examples

			Triangle begins:
  1;
  0,   1;
  0,   1,   1;
  0,   2,   2,  1;
  0,   5,   5,  3,  1;
  0,  14,  14,  9,  4,  1;
  0,  42,  42, 28, 14,  5, 1;
  0, 132, 132, 90, 48, 20, 6, 1;
From _Paul Barry_, Sep 28 2009: (Start)
Production array is
  0, 1,
  0, 1, 1,
  0, 1, 1, 1,
  0, 1, 1, 1, 1,
  0, 1, 1, 1, 1, 1,
  0, 1, 1, 1, 1, 1, 1,
  0, 1, 1, 1, 1, 1, 1, 1,
  0, 1, 1, 1, 1, 1, 1, 1, 1,
  0, 1, 1, 1, 1, 1, 1, 1, 1, 1 (End)
		

Crossrefs

The three triangles A059365, A106566 and A099039 are the same except for signs and the leading term.
See also A009766, A033184, A059365 for other versions.
The following are all versions of (essentially) the same Catalan triangle: A009766, A030237, A033184, A059365, A099039, A106566, A130020, A047072.

Programs

  • Magma
    A106566:= func< n,k | n eq 0 select 1 else (k/n)*Binomial(2*n-k-1, n-k) >;
    [A106566(n,k): k in [0..n], n in [0..12]]; // G. C. Greubel, Sep 06 2021
    
  • Maple
    A106566 := proc(n,k)
        if n = 0 then
            1;
        elif k < 0 or k > n then
            0;
        else
            binomial(2*n-k-1,n-k)*k/n ;
        end if;
    end proc: # R. J. Mathar, Mar 01 2015
  • Mathematica
    T[n_, k_] := Binomial[2n-k-1, n-k]*k/n; T[0, 0] = 1; Table[T[n, k], {n, 0, 10}, {k, 0, n}] // Flatten (* Jean-François Alcover, Feb 18 2017 *)
    (* The function RiordanArray is defined in A256893. *)
    RiordanArray[1&, #(1-Sqrt[1-4#])/(2#)&, 11] // Flatten (* Jean-François Alcover, Jul 16 2019 *)
  • PARI
    {T(n, k) = if( k<=0 || k>n, n==0 && k==0, binomial(2*n - k, n) * k/(2*n - k))}; /* Michael Somos, Oct 01 2022 */
  • Sage
    def A106566(n, k): return 1 if (n==0) else (k/n)*binomial(2*n-k-1, n-k)
    flatten([[A106566(n,k) for k in (0..n)] for n in (0..12)]) # G. C. Greubel, Sep 06 2021
    

Formula

T(n, k) = binomial(2n-k-1, n-k)*k/n for 0 <= k <= n with n > 0; T(0, 0) = 1; T(0, k) = 0 if k > 0.
T(0, 0) = 1; T(n, 0) = 0 if n > 0; T(0, k) = 0 if k > 0; for k > 0 and n > 0: T(n, k) = Sum_{j>=0} T(n-1, k-1+j).
Sum_{j>=0} T(n+j, 2j) = binomial(2n-1, n), n > 0.
Sum_{j>=0} T(n+j, 2j+1) = binomial(2n-2, n-1), n > 0.
Sum_{k>=0} (-1)^(n+k)*T(n, k) = A064310(n). T(n, k) = (-1)^(n+k)*A099039(n, k).
Sum_{k=0..n} T(n, k)*x^k = A000007(n), A000108(n), A000984(n), A007854(n), A076035(n), A076036(n), A127628(n), A126694(n), A115970(n) for x = 0,1,2,3,4,5,6,7,8 respectively.
Sum_{k>=0} T(n, k)*x^(n-k) = C(x, n); C(x, n) are the generalized Catalan numbers.
Sum_{j=0..n-k} T(n+k,2*k+j) = A039599(n,k).
Sum_{j>=0} T(n,j)*binomial(j,k) = A039599(n,k).
Sum_{k=0..n} T(n,k)*A000108(k) = A127632(n).
Sum_{k=0..n} T(n,k)*(x+1)^k*x^(n-k) = A000012(n), A000984(n), A089022(n), A035610(n), A130976(n), A130977(n), A130978(n), A130979(n), A130980(n), A131521(n) for x= 0,1,2,3,4,5,6,7,8,9 respectively. - Philippe Deléham, Aug 25 2007
Sum_{k=0..n} T(n,k)*A000108(k-1) = A121988(n), with A000108(-1)=0. - Philippe Deléham, Aug 27 2007
Sum_{k=0..n} T(n,k)*(-x)^k = A000007(n), A126983(n), A126984(n), A126982(n), A126986(n), A126987(n), A127017(n), A127016(n), A126985(n), A127053(n) for x = 0, 1, 2, 3, 4, 5, 6, 7, 8, 9 respectively. - Philippe Deléham, Oct 27 2007
T(n,k)*2^(n-k) = A110510(n,k); T(n,k)*3^(n-k) = A110518(n,k). - Philippe Deléham, Nov 11 2007
Sum_{k=0..n} T(n,k)*A000045(k) = A109262(n), A000045: Fibonacci numbers. - Philippe Deléham, Oct 28 2008
Sum_{k=0..n} T(n,k)*A000129(k) = A143464(n), A000129: Pell numbers. - Philippe Deléham, Oct 28 2008
Sum_{k=0..n} T(n,k)*A100335(k) = A002450(n). - Philippe Deléham, Oct 30 2008
Sum_{k=0..n} T(n,k)*A100334(k) = A001906(n). - Philippe Deléham, Oct 30 2008
Sum_{k=0..n} T(n,k)*A099322(k) = A015565(n). - Philippe Deléham, Oct 30 2008
Sum_{k=0..n} T(n,k)*A106233(k) = A003462(n). - Philippe Deléham, Oct 30 2008
Sum_{k=0..n} T(n,k)*A151821(k+1) = A100320(n). - Philippe Deléham, Oct 30 2008
Sum_{k=0..n} T(n,k)*A082505(k+1) = A144706(n). - Philippe Deléham, Oct 30 2008
Sum_{k=0..n} T(n,k)*A000045(2k+2) = A026671(n). - Philippe Deléham, Feb 11 2009
Sum_{k=0..n} T(n,k)*A122367(k) = A026726(n). - Philippe Deléham, Feb 11 2009
Sum_{k=0..n} T(n,k)*A008619(k) = A000958(n+1). - Philippe Deléham, Nov 15 2009
Sum_{k=0..n} T(n,k)*A027941(k+1) = A026674(n+1). - Philippe Deléham, Feb 01 2014
G.f.: Sum_{n>=0, k>=0} T(n, k)*x^k*z^n = 1/(1 - x*z*c(z)) where c(z) the g.f. of A000108. - Michael Somos, Oct 01 2022

Extensions

Formula corrected by Philippe Deléham, Oct 31 2008
Corrected by Philippe Deléham, Sep 17 2009
Corrected by Alois P. Heinz, Aug 02 2012

A214292 Triangle read by rows: T(n,k) = T(n-1,k-1) + T(n-1,k), 0 < k < n with T(n,0) = n and T(n,n) = -n.

Original entry on oeis.org

0, 1, -1, 2, 0, -2, 3, 2, -2, -3, 4, 5, 0, -5, -4, 5, 9, 5, -5, -9, -5, 6, 14, 14, 0, -14, -14, -6, 7, 20, 28, 14, -14, -28, -20, -7, 8, 27, 48, 42, 0, -42, -48, -27, -8, 9, 35, 75, 90, 42, -42, -90, -75, -35, -9, 10, 44, 110, 165, 132, 0, -132, -165, -110, -44, -10
Offset: 0

Views

Author

Reinhard Zumkeller, Jul 12 2012

Keywords

Examples

			The triangle begins:
    0:                              0
    1:                            1   -1
    2:                          2   0   -2
    3:                       3    2   -2   -3
    4:                     4    5   0   -5   -4
    5:                  5    9    5   -5   -9   -5
    6:                6   14   14   0  -14  -14   -6
    7:             7   20   28   14  -14  -28  -20   -7
    8:           8   27   48   42   0  -42  -48  -27   -8
    9:        9   35   75   90   42  -42  -90  -75  -35   -9
   10:     10   44  110  165  132   0 -132 -165 -110  -44  -10
   11:  11   54  154  275  297  132 -132 -297 -275 -154  -54  -11  .
		

Crossrefs

Programs

  • Haskell
    a214292 n k = a214292_tabl !! n !! k
    a214292_row n = a214292_tabl !! n
    a214292_tabl = map diff $ tail a007318_tabl
       where diff row = zipWith (-) (tail row) row
  • Mathematica
    row[n_] := Table[Binomial[n, k], {k, 0, n}] // Differences;
    T[n_, k_] := row[n + 1][[k + 1]];
    Table[T[n, k], {n, 0, 10}, {k, 0, n}] // Flatten (* Jean-François Alcover, Jul 31 2018 *)

Formula

T(n,k) = A007318(n+1,k+1) - A007318(n+1,k), 0<=k<=n, i.e. first differences of rows in Pascal's triangle;
T(n,k) = -T(n,k);
row sums and central terms equal 0, cf. A000004;
sum of positive elements of n-th row = A014495(n+1);
T(n,0) = n;
T(n,1) = A000096(n-2) for n > 1; T(n,1) = - A080956(n) for n > 0;
T(n,2) = A005586(n-4) for n > 3; T(n,2) = A129936(n-2);
T(n,3) = A005587(n-6) for n > 5;
T(n,4) = A005557(n-9) for n > 8;
T(n,5) = A064059(n-11) for n > 10;
T(n,6) = A064061(n-13) for n > 12;
T(n,7) = A124087(n) for n > 14;
T(n,8) = A124088(n) for n > 16;
T(2*n+1,n) = T(2*n+2,n) = A000108(n+1), Catalan numbers;
T(2*n+3,n) = A000245(n+2);
T(2*n+4,n) = A002057(n+1);
T(2*n+5,n) = A000344(n+3);
T(2*n+6,n) = A003517(n+3);
T(2*n+7,n) = A000588(n+4);
T(2*n+8,n) = A003518(n+4);
T(2*n+9,n) = A001392(n+5);
T(2*n+10,n) = A003519(n+5);
T(2*n+11,n) = A000589(n+6);
T(2*n+12,n) = A090749(n+6);
T(2*n+13,n) = A000590(n+7).

A064061 Eighth column of Catalan triangle A009766.

Original entry on oeis.org

429, 1430, 3432, 7072, 13260, 23256, 38760, 62016, 95931, 144210, 211508, 303600, 427570, 592020, 807300, 1085760, 1442025, 1893294, 2459664, 3164480, 4034712, 5101360, 6399888, 7970688, 9859575, 12118314, 14805180, 17985552, 21732542, 26127660, 31261516
Offset: 0

Views

Author

Wolfdieter Lang, Sep 13 2001

Keywords

Crossrefs

Cf. A009766, A064059 (seventh column), A062991, A214292.

Programs

  • Magma
    A064061:= func< n | (n+1)*Binomial(n+14, 6)/7 >;
    [A064061(n): n in [0..40]]; // G. C. Greubel, Sep 28 2024
    
  • Maple
    [seq(binomial(n,7)-binomial(n,5),n=13..37)]; # Zerinvary Lajos, Nov 25 2006
  • Mathematica
    CoefficientList[Series[(132*z^6 - 924*z^5 + 2730*z^4 - 4368*z^3 + 4004*z^2 - 2002*z + 429)/(z - 1)^8, {z, 0, 100}], z] (* Vladimir Joseph Stephan Orlovsky, Jul 16 2011 *)
    Table[Binomial[n,7]-Binomial[n,5],{n,13,50}] (* or *) LinearRecurrence[ {8,-28,56,-70,56,-28,8,-1},{429,1430,3432,7072,13260,23256,38760,62016},40] (* Harvey P. Dale, Sep 03 2015 *)
  • SageMath
    def A064061(n): return (n+1)*binomial(n+14,6)//7
    [A064061(n) for n in range(41)] # G. C. Greubel, Sep 28 2024

Formula

a(n) = A009766(n+7, 7) = (n+1)*binomial(n+14, 6)/7.
G.f.: (429-2002*x+4004*x^2-4368*x^3+2730* x^4-924*x^5+132*x^6)/(1-x)^8; numerator polynomial is N(2;6, x) from A062991.
a(n) = C(n+13,7) - C(n+13,5). - Zerinvary Lajos, Nov 25 2006
a(n) = A214292(n+13,6). - Reinhard Zumkeller, Jul 12 2012
From Amiram Eldar, Sep 06 2022: (Start)
Sum_{n>=0} 1/a(n) = 323171/88339680.
Sum_{n>=0} (-1)^n/a(n) = 7929257917/88339680 - 55552*log(2)/429. (End)

A115126 First (k=1) triangle of numbers related to totally asymmetric exclusion process (case alpha=1, beta=1).

Original entry on oeis.org

1, 2, 2, 3, 5, 5, 4, 9, 14, 14, 5, 14, 28, 42, 42, 6, 20, 48, 90, 132, 132, 7, 27, 75, 165, 297, 429, 429, 8, 35, 110, 275, 572, 1001, 1430, 1430, 9, 44, 154, 429, 1001, 2002, 3432, 4862, 4862, 10, 54, 208, 637, 1638, 3640, 7072, 11934, 16796, 16796, 11, 65, 273, 910
Offset: 1

Views

Author

Wolfdieter Lang, Jan 13 2006

Keywords

Comments

First (k=0) column removed from Catalan triangle A009766(n,k).
In the Derrida et al. 1992 reference this triangle, called here X(alpha=1,beta=1;k=1,n,m), n >= m >= 1, is called there X_{N=n}(K=1,p=m) with alpha=1 and beta=1.
The column sequences give A000027 (natural numbers), A000096, A005586, A005587, A005557, A064059, A064061 for m=1..7. The numerator polynomials for the o.g.f. of column m is found in A062991 and the denominator is (1-x)^(m+1).
The diagonal sequences are convolutions of the Catalan numbers A000108, starting with the main diagonal.

Examples

			[1];[2,2];[3,5,5];[4,9,14,14];...
a(4,2) = 9 = binomial(6,2)*3/5.
		

References

  • B. Derrida, E. Domany and D. Mukamel, An exact solution of a one-dimensional asymmetric exclusion model with open boundaries, J. Stat. Phys. 69, 1992, 667-687; eqs. (20), (21), p. 672.
  • B. Derrida, M. R. Evans, V. Hakim and V. Pasquier, Exact solution of a 1D asymmetric exclusion model using a matrix formulation, J. Phys. A 26, 1993, 1493-1517; eq. (39), p. 1501, also appendix A1, (A12) p. 1513.

Crossrefs

Row sums give A001453(n+1)=A000108(n+1)-1 (Catalan -1).

Formula

a(n, m)= binomial(n+m, n)*(n-m+1)/(n+1), n>=m>=1; a(n, m)=0 if n

A124087 9th column of Catalan triangle A009766.

Original entry on oeis.org

1430, 4862, 11934, 25194, 48450, 87210, 149226, 245157, 389367, 600875, 904475, 1332045, 1924065, 2731365, 3817125, 5259150, 7152444, 9612108, 12776588, 16811300, 21912660, 28312548, 36283236, 46142811, 58261125, 73066305, 91051857, 112784399, 138912059
Offset: 15

Author

Zerinvary Lajos, Nov 25 2006

Keywords

Crossrefs

Programs

  • Maple
    [seq(binomial(n,8)-binomial(n,6),n=15..45)];
  • Mathematica
    CoefficientList[Series[(429*z^7 - 3432*z^6 + 11880*z^5 - 23100*z^4 + 27300*z^3 - 19656*z^2 + 8008*z - 1430)/(z - 1)^9, {z, 0, 100}], z] (* Vladimir Joseph Stephan Orlovsky, Jul 16 2011 *)
    Table[Binomial[n,8]-Binomial[n,6],{n,15,60}] (* or *) LinearRecurrence[ {9,-36,84,-126,126,-84,36,-9,1},{1430,4862,11934,25194,48450,87210,149226,245157,389367},30] (* Harvey P. Dale, Apr 15 2017 *)

Formula

a(n) = C(n,8)-C(n,6).
a(n) = A214292(n+15,7). - Reinhard Zumkeller, Jul 12 2012
From Amiram Eldar, Sep 06 2022: (Start)
Sum_{n>=15} 1/a(n) = 12515/11594583.
Sum_{n>=15} (-1)^(n+1)/a(n) = 1942528*log(2)/6435 - 60651032147/289864575. (End)

A124088 10th column of Catalan triangle A009766.

Original entry on oeis.org

4862, 16796, 41990, 90440, 177650, 326876, 572033, 961400, 1562275, 2466750, 3798795, 5722860, 8454225, 12271350, 17530500, 24682944, 34295052, 47071640, 63882940, 85795600, 114108148, 150391384, 196534195, 254795320, 327861625, 418913482, 531697881
Offset: 17

Author

Zerinvary Lajos, Nov 25 2006

Keywords

Crossrefs

Programs

  • Maple
    [seq(binomial(n,9)-binomial(n,7),n=17..42)];
  • Mathematica
    CoefficientList[Series[(1430*z^8 - 12870*z^7 + 51051*z^6 - 116688*z^5 + 168300*z^4 - 157080*z^3 + 92820*z^2 - 31824*z + 4862)/(z - 1)^10, {z, 0, 100}], z] (* Vladimir Joseph Stephan Orlovsky, Jul 16 2011 *)

Formula

a(n) = C(n,9)-C(n,7).
a(n) = A214292(n+17,8). - Reinhard Zumkeller, Jul 12 2012
From Amiram Eldar, Sep 06 2022: (Start)
Sum_{n>=17} 1/a(n) = 2074783/6618932320.
Sum_{n>=17} (-1)^(n+1)/a(n) = 2259208566291/4727808800 - 8379648*log(2)/12155. (End)
Showing 1-7 of 7 results.