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.

Previous Showing 21-28 of 28 results.

A124574 Triangle read by rows: row n is the first row of the matrix M[n]^(n-1), where M[n] is the n X n tridiagonal matrix with main diagonal (3,4,4,...) and super- and subdiagonals (1,1,1,...).

Original entry on oeis.org

1, 3, 1, 10, 7, 1, 37, 39, 11, 1, 150, 204, 84, 15, 1, 654, 1050, 555, 145, 19, 1, 3012, 5409, 3415, 1154, 222, 23, 1, 14445, 28063, 20223, 8253, 2065, 315, 27, 1, 71398, 146920, 117208, 55300, 16828, 3352, 424, 31, 1, 361114, 776286, 671052, 355236, 125964, 30660, 5079, 549, 35, 1
Offset: 1

Views

Author

Keywords

Comments

Column 1 yields A064613. Row sums yield A081671.
Triangle T(n,k), 0 <= k <= n, defined by: T(0,0)=1, T(n,k)=0 if k < 0 or if k > n, T(n,0) = 3*T(n-1,0) + T(n-1,1), T(n,k) = T(n-1,k-1) + 4*T(n-1,k) + T(n-1,k+1). - Philippe Deléham, Feb 27 2007
Triangle T(n,k), 0 <= k <= n, read by rows given by: T(0,0)=1, T(n,k)=0 if k < 0 or if k > n, T(n,0) = 3*T(n-1,0) + T(n-1,1), T(n,k) = T(n-1,k-1) + 4*T(n-1,k) + T(n-1,k+1) for k >= 1. - Philippe Deléham, Mar 27 2007
This triangle belongs to the family of triangles defined by: T(0,0)=1, T(n,k)=0 if k < 0 or if k > n, T(n,0) = x*T(n-1,0) + T(n-1,1), T(n,k) = T(n-1,k-1) + y*T(n-1,k) + T(n-1,k+1) for k >= 1. Other triangles arise from choosing different values for (x,y): (0,0) -> A053121; (0,1) -> A089942; (0,2) -> A126093; (0,3) -> A126970; (1,0)-> A061554; (1,1) -> A064189; (1,2) -> A039599; (1,3) -> A110877; (1,4) -> A124576; (2,0) -> A126075; (2,1) -> A038622; (2,2) -> A039598; (2,3) -> A124733; (2,4) -> A124575; (3,0) -> A126953; (3,1) -> A126954; (3,2) -> A111418; (3,3) -> A091965; (3,4) -> A124574; (4,3) -> A126791; (4,4) -> A052179; (4,5) -> A126331; (5,5) -> A125906. - Philippe Deléham, Sep 25 2007
6^n = ((n+1)-th row terms) dot (first n+1 odd integers). Example: 6^4 = 1296 = (150, 204, 84, 15, 1) dot (1, 3, 5, 7, 9) = (150 + 612 + 420 + 105 + 9)= 1296. - Gary W. Adamson, Jun 15 2011
From Peter Bala, Sep 06 2022: (Start)
The following assume the row and column indexing start at 0.
Riordan array (f(x), x*g(x)), where f(x) = (1 - sqrt((1 - 6*x)/(1 - 2*x)))/(2*x) is the o.g.f. of A064613 and g(x) = (1 - 4*x - sqrt(1 - 8*x + 12*x^2))/(2*x^2) is the o.g.f. of A005572.
The n-th row polynomial R(n,x) equals the n-th degree Taylor polynomial of the function (1 - x)*(1 + 4*x + x^2)^n expanded about the point x = 0.
T(n,k) = a(n,k) - a(n,k+1), where a(n,k) = Sum_{j = 0..n} binomial(n,j)* binomial(j,n-k-j)*4^(2*j+k-n). (End)

Examples

			Row 4 is (37,39,11,1) because M[4]= [3,1,0,0;1,4,1,0;0,1,4,1;0,0,1,4] and M[4]^3=[37,39,11,1; 39, 87, 51, 12; 11, 51, 88, 50; 1, 12, 50, 76].
Triangle starts:
    1;
    3,    1
   10,    7,   1;
   37,   39,  11,   1
  150,  204,  84,  15,  1;
  654, 1050, 555, 145, 19, 1;
From _Philippe Deléham_, Nov 07 2011: (Start)
Production matrix begins:
  3, 1
  1, 4, 1
  0, 1, 4, 1
  0, 0, 1, 4, 1
  0, 0, 0, 1, 4, 1
  0, 0, 0, 0, 1, 4, 1
  0, 0, 0, 0, 0, 1, 4, 1
  0, 0, 0, 0, 0, 0, 1, 4, 1
  0, 0, 0, 0, 0, 0, 0, 1, 4, 1 (End)
		

Crossrefs

Programs

  • Maple
    with(linalg): m:=proc(i,j) if i=1 and j=1 then 3 elif i=j then 4 elif abs(i-j)=1 then 1 else 0 fi end: for n from 3 to 11 do A[n]:=matrix(n,n,m): B[n]:=multiply(seq(A[n],i=1..n-1)) od: 1; 3,1; for n from 3 to 11 do seq(B[n][1,j],j=1..n) od; # yields sequence in triangular form
    T := (n,k) -> (-1)^(n-k)*simplify(GegenbauerC(n-k,-n+1,2)+GegenbauerC(n-k-1,-n+1,2 )): seq(print(seq(T(n,k),k=1..n)), n=1..10); # Peter Luschny, May 13 2016
  • Mathematica
    M[n_] := SparseArray[{{1, 1} -> 3, Band[{2, 2}] -> 4, Band[{1, 2}] -> 1, Band[{2, 1}] -> 1}, {n, n}]; row[1] = {1}; row[n_] := MatrixPower[M[n], n-1] // First // Normal; Table[row[n], {n, 1, 10}] // Flatten (* Jean-François Alcover, Jan 09 2014 *)
    T[0, 0, x_, y_] := 1; T[n_, 0, x_, y_] := x*T[n - 1, 0, x, y] + T[n - 1, 1, x, y]; T[n_, k_, x_, y_] := T[n, k, x, y] = If[k < 0 || k > n, 0, T[n - 1, k - 1, x, y] + y*T[n - 1, k, x, y] + T[n - 1, k + 1, x, y]]; Table[T[n, k, 3, 4], {n, 0, 10}, {k, 0, n}] // Flatten (* G. C. Greubel, May 22 2017 *)

Formula

Sum_{k=0..n} (-1)^(n-k)*T(n,k) = (-2)^n. - Philippe Deléham, Feb 27 2007
Sum_{k=0..n} T(n,k)*(2*k+1) = 6^n. - Philippe Deléham, Mar 27 2007
T(n,k) = (-1)^(n-k)*(GegenbauerC(n-k,-n+1,2) + GegenbauerC(n-k-1,-n+1,2)). - Peter Luschny, May 13 2016

Extensions

Edited by N. J. A. Sloane, Dec 04 2006

A126331 Triangle T(n,k), 0 <= k <= n, read by rows defined by: T(0,0)=1, T(n,k)=0 if k < 0 or if k > n, T(n,0) = 4*T(n-1,0) + T(n-1,1), T(n,k) = T(n-1,k-1) + 5*T(n-1,k) + T(n-1,k+1) for k >= 1.

Original entry on oeis.org

1, 4, 1, 17, 9, 1, 77, 63, 14, 1, 371, 406, 134, 19, 1, 1890, 2535, 1095, 230, 24, 1, 10095, 15660, 8240, 2269, 351, 29, 1, 56040, 96635, 59129, 19936, 4053, 497, 34, 1, 320795, 598344, 412216, 162862, 40698, 6572, 668, 39, 1
Offset: 0

Views

Author

Philippe Deléham, Mar 10 2007

Keywords

Comments

This triangle belongs to the family of triangles defined by: T(0,0)=1, T(n,k)=0 if k < 0 or if k > n, T(n,0) = x*T(n-1,0) + T(n-1,1), T(n,k) = T(n-1,k-1) + y*T(n-1,k) + T(n-1,k+1) for k >= 1. Other triangles arise from choosing different values for (x,y): (0,0) -> A053121; (0,1) -> A089942; (0,2) -> A126093; (0,3) -> A126970; (1,0)-> A061554; (1,1) -> A064189; (1,2) -> A039599; (1,3) -> A110877; (1,4) -> A124576; (2,0) -> A126075; (2,1) -> A038622; (2,2) -> A039598; (2,3) -> A124733; (2,4) -> A124575; (3,0) -> A126953; (3,1) -> A126954; (3,2) -> A111418; (3,3) -> A091965; (3,4) -> A124574; (4,3) -> A126791; (4,4) -> A052179; (4,5) -> A126331; (5,5) -> A125906. - Philippe Deléham, Sep 25 2007
7^n = (n-th row terms) dot (first n+1 odd integers). Example: 7^3 = 343 = (77, 63, 14, 1) dot (1, 3, 5, 7) = (77 + 189 + 70 + 7) = 243. - Gary W. Adamson, Jun 15 2011

Examples

			Triangle begins:
      1;
      4,     1;
     17,     9,    1;
     77,    63,   14,    1;
    371,   406,  134,   19,   1;
   1890,  2535, 1095,  230,  24,  1;
  10095, 15660, 8240, 2269, 351, 29, 1;
From _Philippe Deléham_, Nov 07 2011: (Start)
Production matrix begins:
  4, 1
  1, 5, 1
  0, 1, 5, 1
  0, 0, 1, 5, 1
  0, 0, 0, 1, 5, 1,
  0, 0, 0, 0, 1, 5, 1
  0, 0, 0, 0, 0, 1, 5, 1
  0, 0, 0, 0, 0, 0, 1, 5, 1
  0, 0, 0, 0, 0, 0, 0, 1, 5, 1 (End)
		

Programs

  • Mathematica
    T[0, 0, x_, y_] := 1; T[n_, 0, x_, y_] := x*T[n - 1, 0, x, y] + T[n - 1, 1, x, y]; T[n_, k_, x_, y_] := T[n, k, x, y] = If[k < 0 || k > n, 0,
    T[n - 1, k - 1, x, y] + y*T[n - 1, k, x, y] + T[n - 1, k + 1, x, y]];
    Table[T[n, k, 4, 5], {n, 0, 10}, {k, 0, n}] // Flatten (* G. C. Greubel, May 22 2017 *)

Formula

Sum_{k=0..n} T(n,k) = A098409(n).
Sum_{k>=0} T(m,k)*T(n,k) = T(m+n,0) = A104455(m+n).
Sum_{k=0..n} T(n,k)*(2*k+1) = 7^n. - Philippe Deléham, Mar 26 2007

A126791 Binomial matrix applied to A111418.

Original entry on oeis.org

1, 4, 1, 17, 7, 1, 75, 39, 10, 1, 339, 202, 70, 13, 1, 1558, 1015, 425, 110, 16, 1, 7247, 5028, 2400, 771, 159, 19, 1, 34016, 24731, 12999, 4872, 1267, 217, 22, 1, 160795, 121208, 68600, 28882, 8890, 1940, 284, 25, 1, 764388, 593019, 355890, 164136
Offset: 0

Views

Author

Philippe Deléham, Mar 14 2007

Keywords

Comments

Triangle T(n,k), 0 <= k <= n, read by rows defined by: T(0,0)=1, T(n,k)=0 if k < 0 or if k > n, T(n,0) = 4*T(n-1,0) + T(n-1,1), T(n,k) = T(n-1,k-1) + 3*T(n-1,k) + T(n-1,k+1) for k >= 1.
This triangle belongs to the family of triangles defined by: T(0,0)=1, T(n,k)=0 if k < 0 or if k > n, T(n,0) = x*T(n-1,0) + T(n-1,1), T(n,k) = T(n-1,k-1) + y*T(n-1,k) + T(n-1,k+1) for k >= 1. Other triangles arise from choosing different values for (x,y): (0,0) -> A053121; (0,1) -> A089942; (0,2) -> A126093; (0,3) -> A126970; (1,0)-> A061554; (1,1) -> A064189; (1,2) -> A039599; (1,3) -> A110877; (1,4) -> A124576; (2,0) -> A126075; (2,1) -> A038622; (2,2) -> A039598; (2,3) -> A124733; (2,4) -> A124575; (3,0) -> A126953; (3,1) -> A126954; (3,2) -> A111418; (3,3) -> A091965; (3,4) -> A124574; (4,3) -> A126791; (4,4) -> A052179; (4,5) -> A126331; (5,5) -> A125906. - Philippe Deléham, Sep 25 2007
From R. J. Mathar, Mar 12 2013: (Start)
The matrix inverse starts
1;
-4, 1;
11, -7, 1;
-29, 31, -10, 1;
76, -115, 60, -13, 1;
-199, 390, -285, 98, -16, 1;
521, -1254, 1185, -566, 145, -19, 1;
-1364, 3893, -4524, 2785, -985, 201, -22, 1; ... (End)

Examples

			Triangle begins:
      1;
      4,     1;
     17,     7,     1;
     75,    39,    10,    1;
    339,   202,    70,   13,    1;
   1558,  1015,   425,  110,   16,   1;
   7247,  5028,  2400,  771,  159,  19,  1;
  34016, 24731, 12999, 4872, 1267, 217, 22, 1; ...
From _Philippe Deléham_, Nov 07 2011: (Start)
Production matrix begins:
  4, 1
  1, 3, 1
  0, 1, 3, 1
  0, 0, 1, 3, 1
  0, 0, 0, 1, 3, 1
  0, 0, 0, 0, 1, 3, 1
  0, 0, 0, 0, 0, 1, 3, 1
  0, 0, 0, 0, 0, 0, 1, 3, 1
  0, 0, 0, 0, 0, 0, 0, 1, 3, 1 (End)
		

Programs

  • Maple
    A126791 := proc(n,k)
        if n=0 and k = 0 then
            1 ;
        elif k <0 or k>n then
            0;
        elif k= 0 then
            4*procname(n-1,0)+procname(n-1,1) ;
        else
            procname(n-1,k-1)+3*procname(n-1,k)+procname(n-1,k+1) ;
        end if;
    end proc: # R. J. Mathar, Mar 12 2013
    T := (n,k) -> (-1)^(n-k)*simplify(GegenbauerC(n-k,-n+1,3/2) - GegenbauerC(n-k-1, -n+1, 3/2)): seq(seq(T(n,k),k=1..n),n=1..10); # Peter Luschny, May 13 2016
  • Mathematica
    T[0, 0, x_, y_] := 1; T[n_, 0, x_, y_] := x*T[n - 1, 0, x, y] + T[n - 1, 1, x, y]; T[n_, k_, x_, y_] := T[n, k, x, y] = If[k < 0 || k > n, 0,
    T[n - 1, k - 1, x, y] + y*T[n - 1, k, x, y] + T[n - 1, k + 1, x, y]];
    Table[T[n, k, 4, 3], {n, 0, 10}, {k, 0, n}] // Flatten (* G. C. Greubel, May 22 2017 *)

Formula

Sum_{k>=0} T(m,k)*T(n,k) = T(m+n,0) = A026378(m+n+1).
Sum_{k=0..n} T(n,k) = 5^n = A000351(n).
T(n,k) = (-1)^(n-k)*(GegenbauerC(n-k,-n+1,3/2) - GegenbauerC(n-k-1,-n+1,3/2)). - Peter Luschny, May 13 2016
The n-th row polynomial R(n,x) equals the n-th degree Taylor polynomial of the function (1 + x )*(1 + 3*x + x^2)^n expanded about the point x = 0. - Peter Bala, Sep 06 2022

A126953 Triangle T(n,k), 0 <= k <= n, read by rows given by: T(0,0)=1, T(n,k)=0 if k < 0 or if k > n, T(n,0) = 3*T(n-1,0) + T(n-1,1), T(n,k) = T(n-1,k-1) + T(n-1,k+1) for k >= 1.

Original entry on oeis.org

1, 3, 1, 10, 3, 1, 33, 11, 3, 1, 110, 36, 12, 3, 1, 366, 122, 39, 13, 3, 1, 1220, 405, 135, 42, 14, 3, 1, 4065, 1355, 447, 149, 45, 15, 3, 1, 13550, 4512, 1504, 492, 164, 48, 16, 3, 1, 45162, 15054, 5004, 1668, 540, 180, 51, 17, 3, 1
Offset: 0

Views

Author

Philippe Deléham, Mar 19 2007

Keywords

Comments

This triangle belongs to the family of triangles defined by: T(0,0)=1, T(n,k)=0 if k < 0 or if k > n, T(n,0) = x*T(n-1,0) + T(n-1,1), T(n,k) = T(n-1,k-1) + y*T(n-1,k) + T(n-1,k+1) for k >= 1. Other triangles arise from choosing different values for (x,y): (0,0) -> A053121; (0,1) -> A089942; (0,2) -> A126093; (0,3) -> A126970; (1,0)-> A061554; (1,1) -> A064189; (1,2) -> A039599; (1,3) -> A110877; (1,4) -> A124576; (2,0) -> A126075; (2,1) -> A038622; (2,2) -> A039598; (2,3) -> A124733; (2,4) -> A124575; (3,0) -> A126953; (3,1) -> A126954; (3,2) -> A111418; (3,3) -> A091965; (3,4) -> A124574; (4,3) -> A126791; (4,4) -> A052179; (4,5) -> A126331; (5,5) -> A125906. - Philippe Deléham, Sep 25 2007
Riordan array (2/(1-6x+sqrt(1-4*x^2)),x*c(x^2)) where c(x)= g.f. of the Catalan numbers A000108. - Philippe Deléham, Jun 01 2013

Examples

			Triangle begins:
     1;
     3,    1;
    10,    3,   1;
    33,   11,   3,   1;
   110,   36,  12,   3,  1;
   366,  122,  39,  13,  3,  1;
  1220,  405, 135,  42, 14,  3, 1;
  4065, 1355, 447, 149, 45, 15, 3, 1;
		

Programs

  • Mathematica
    T[0, 0, x_, y_] := 1; T[n_, 0, x_, y_] := x*T[n - 1, 0, x, y] + T[n - 1, 1, x, y]; T[n_, k_, x_, y_] := T[n, k, x, y] = If[k < 0 || k > n, 0, T[n - 1, k - 1, x, y] + y*T[n - 1, k, x, y] + T[n - 1, k + 1, x, y]];
    Table[T[n, k, 3, 0], {n, 0, 10}, {k, 0, n}] // Flatten (* G. C. Greubel, Apr 21 2017 *)

Formula

Sum_{k=0..n} T(n,k) = A127359(n).
Sum_{k>=0} T(m,k)*T(n,k) = T(m+n,0) = A126931(m+n).
Sum_{k=0..n} T(n,k)*(-2*k+1) = 2^n. - Philippe Deléham, Mar 25 2007

A054341 Row sums of triangle A054336 (central binomial convolutions).

Original entry on oeis.org

1, 2, 5, 12, 30, 74, 185, 460, 1150, 2868, 7170, 17904, 44760, 111834, 279585, 698748, 1746870, 4366460, 10916150, 27287944, 68219860, 170541252, 426353130, 1065853432, 2664633580, 6661479944, 16653699860, 41633878200, 104084695500, 260210401530, 650526003825
Offset: 0

Views

Author

Wolfdieter Lang, Mar 13 2000

Keywords

Comments

a(n) = # Dyck (n+1)-paths all of whose components are symmetric. A strict Dyck path is one with exactly one return to ground level (necessarily at the end). Every nonempty Dyck path is expressible uniquely as a concatenation of one or more strict Dyck paths, called its components. - David Callan, Mar 02 2005
a(n) = # 2-Motzkin paths (i.e., Motzkin paths with blue and red level steps) with no level steps at positive height. Example: a(2)=5 because, denoting U=(1,1), D=(1,-1), B=blue (1,0), R=red (1,0), we have BB, BR, RB, RR, and UD. - Emeric Deutsch, Jun 07 2011
Inverse Chebyshev transform of the second kind applied to 2^n. This maps g(x) -> c(x^2)g(xc(x^2)). - Paul Barry, Sep 14 2005
Hankel transform of this sequence gives A000012 = [1,1,1,1,1,1,1,...]. - Philippe Deléham, Oct 24 2007
Inverse binomial transform of A059738. - Philippe Deléham, Nov 24 2009

Examples

			a(4) = 30, the upper left term of M^4.
		

Crossrefs

Programs

  • Maple
    b:= proc(x, y) option remember; `if`(x=0, 1,
          b(x-1, 0)+`if`(y>0, b(x-1, y-1), 0)+b(x-1, y+1))
        end:
    a:= n-> b(n, 0):
    seq(a(n), n=0..31);  # Alois P. Heinz, Jan 23 2024
  • Mathematica
    CoefficientList[Series[2/(1-4*x+Sqrt[1-4*x^2]), {x, 0, 20}], x] (* Vaclav Kotesovec, Feb 13 2014 *)

Formula

a(n) = Sum_{m=0..n} A054336(n, m).
G.f.: 1/(1-2*x-x^2*c(x^2)), where c(x) = g.f. for Catalan numbers A000108.
From_Paul Barry_, Sep 14 2005: (Start)
G.f.: c(x^2)/(1-2*x*c(x^2));
a(n) = Sum_{k=0..n} binomial(n,(n-k)/2)*(1 + (-1)^(n+k))*2^k*(k+1)/(n+k+2). (End)
G.f.: 2/(1-4*x+sqrt(1-4*x^2)). - Ira M. Gessel, Oct 27 2013
a(n) = A127358(n+1) - 2*A127358(n). - Philippe Deléham, Mar 02 2007
a(n) = A126075(n,0). - Philippe Deléham, Nov 24 2009
a(n) = Sum_{k=0..n} A053121(n,k)*2^k. - Philippe Deléham, Nov 28 2009
From Gary W. Adamson, Sep 07 2011: (Start)
a(n) is the upper left term of M^n, M is an infinite square production matrix as follows:
2, 1, 0, 0, 0, ...
1, 0, 2, 0, 0, ...
0, 1, 0, 1, 0, ...
0, 0, 1, 0, 1, ...
0, 0, 0, 1, 0, ...
... (End)
Conjecture: 2*(n+1)*a(n) +5*(-n-1)*a(n-1) +8*(-n+2)*a(n-2) +20*(n-2)*a(n-3)=0. - R. J. Mathar, Nov 30 2012
a(n) ~ 3 * 5^n / 2^(n+2). - Vaclav Kotesovec, Feb 13 2014

A127358 a(n) = Sum_{k=0..n} binomial(n, floor(k/2))*2^(n-k).

Original entry on oeis.org

1, 3, 8, 21, 54, 138, 350, 885, 2230, 5610, 14088, 35346, 88596, 221952, 555738, 1391061, 3480870, 8708610, 21783680, 54483510, 136254964, 340729788, 852000828, 2130354786, 5326563004, 13317759588, 33296999120, 83247698100, 208129274400, 520343244300
Offset: 0

Views

Author

Paul Barry, Jan 11 2007

Keywords

Comments

Hankel transform is (-1)^n. In general, given r >= 0, the sequence given by Sum_{k=0..n} binomial(n, floor(k/2))*r^(n-k) has Hankel transform (1-r)^n. The sequence is the image of the sequence with g.f. (1+x)/(1-2*x) under the Chebyshev mapping g(x) -> (1/sqrt(1-4*x^2))*g(x*c(x^2)), where c(x) is the g.f. of the Catalan numbers A000108.

Examples

			a(3) = 21 = (12 + 6 + 2 + 1), where the top row of M^3 = (12, 6, 2, 1).
		

Crossrefs

Cf. A107430. - Philippe Deléham, Sep 16 2009

Programs

  • Mathematica
    Table[Sum[Binomial[n,Floor[k/2]]2^(n-k),{k,0,n}],{n,0,30}] (* Harvey P. Dale, Jun 03 2012 *)
    CoefficientList[Series[(1 + 2*x - Sqrt[1 - 4*x^2])/(2*Sqrt[1 - 4*x^2]*(x - 1 + Sqrt[1 - 4*x^2])), {x, 0, 50}], x] (* G. C. Greubel, May 22 2017 *)
  • PARI
    my(x='x+O('x^50)); Vec((1 + 2*x - sqrt(1 - 4*x^2))/(2*sqrt(1 - 4*x^2)*(x - 1 + sqrt(1 - 4*x^2)))) \\ G. C. Greubel, May 22 2017

Formula

G.f.: (1/sqrt(1 - 4x^2))(1 + x*c(x^2))/(1 - 2*x*c(x^2)).
a(n) = 2*a(n-1) + A054341(n-1). a(n) = Sum_{k=0..n} A126075(n,k). - Philippe Deléham, Mar 03 2007
a(n) = Sum_{k=0..n} A061554(n,k)*2^k. - Philippe Deléham, Dec 04 2009
From Gary W. Adamson, Sep 07 2011: (Start)
a(n) is the sum of top row terms of M^n, M is an infinite square production matrix as follows:
2, 1, 0, 0, 0, ...
1, 0, 1, 0, 0, ...
0, 1, 0, 1, 0, ...
0, 0, 1, 0, 1, ...
0, 0, 0, 1, 0, ...
... (End)
D-finite with recurrence 2*n*a(n) + (-5*n-4)*a(n-1) + 2*(-4*n+13)*a(n-2) + 20*(n-2)*a(n-3) = 0. - R. J. Mathar, Nov 30 2012
a(n) ~ 3 * 5^n / 2^(n+1). - Vaclav Kotesovec, Feb 13 2014

A128937 Triangle formed by reading A039598 mod 2.

Original entry on oeis.org

1, 0, 1, 1, 0, 1, 0, 0, 0, 1, 0, 0, 1, 0, 1, 0, 1, 0, 0, 0, 1, 1, 0, 1, 0, 1, 0, 1, 0, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 1, 0, 1, 0, 0, 0, 0, 0, 1, 0, 0, 0, 1, 0, 0, 0, 0, 1, 0, 1, 0, 1, 0, 1, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 1, 0, 0, 1, 0, 1, 0, 0, 0, 0, 0, 1, 0, 1, 0, 1, 0, 0, 0, 1, 0, 0, 0, 1, 0, 0, 0, 1
Offset: 0

Views

Author

Philippe Deléham, Apr 27 2007, May 02 2007

Keywords

Comments

Also triangle formed by reading triangles A052179, A053121, A124575, A126075, A126093.
Also triangle formed by reading A065600 mod 2. - Philippe Deléham, Oct 15 2007

Examples

			Triangle begins:
  1;
  0, 1;
  1, 0, 1;
  0, 0, 0, 1;
  0, 0, 1, 0, 1;
  0, 1, 0, 0, 0, 1;
  1, 0, 1, 0, 1, 0, 1;
  0, 0, 0, 0, 0, 0, 0, 1;
  0, 0, 0, 0, 0, 0, 1, 0, 1;
  0, 0, 0, 0, 0, 1, 0, 0, 0, 1;
  0, 0, 0, 0, 1, 0, 1, 0, 1, 0, 1;
  0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 1;
  0, 0, 1, 0, 1, 0, 0, 0, 0, 0, 1, 0, 1;
  0, 1, 0, 0, 0, 1, 0, 0, 0, 1, 0, 0, 0, 1;
  1, 0, 1, 0, 1, 0, 1, 0, 1, 0, 1, 0, 1, 0, 1;
  0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1; ...
		

Crossrefs

Cf. A048896 (row sums).

Programs

Formula

Sum_{k=0..n} T(n,k) = A048896(n).
Sum_{k=0..n} T(n,k)*2^(n-k) = A101692(n). - Philippe Deléham, Oct 09 2007
Sum_{k=0..n} T(n,k)*2^k = A062878(n+1)/3. - Philippe Deléham, Aug 31 2009

A130314 A051731 * A126705.

Original entry on oeis.org

1, 3, 1, 4, 1, 1, 7, 2, 1, 1, 7, 1, 0, 1, 1, 12, 4, 2, 0, 1, 1, 9, 2, 1, 0, 0, 1, 1, 17, 4, 1, 2, 0, 0, 1, 1, 14, 3, 3, 1, 0, 0, 0, 1, 1, 19, 6, 2, 1, 2, 0, 0, 0, 1, 1
Offset: 1

Views

Author

Gary W. Adamson, May 21 2007

Keywords

Comments

Row sums = A129235: (1, 4, 6, 11, 10, 20, ...).

Examples

			First few rows of the triangle:
   1;
   3, 1;
   4, 1, 1;
   7, 2, 1, 1;
   7, 1, 0, 1, 1;
  12, 4, 2, 0, 1, 1;
  ...
		

Crossrefs

Formula

Inverse Moebius transform of A126075.
Previous Showing 21-28 of 28 results.