A152198 -id:A152198 - cp's OEIS frontend

A173284 Triangle by columns, Fibonacci numbers in every column shifted down twice, for k > 0.

1, 1, 2, 1, 3, 1, 5, 2, 1, 8, 3, 1, 13, 5, 2, 21, 8, 3, 1, 34, 13, 5, 2, 1, 55, 21, 8, 3, 1, 89, 34, 13, 5, 2, 1, 144, 55, 21, 8, 3, 1, 233, 89, 34, 13, 5, 2, 1, 377, 144, 55, 21, 8, 3, 1, 610, 233, 89, 34, 13, 5, 2, 1

Offset: 0

Gary W. Adamson, Feb 14 2010

The row sums equal A052952.
Let the triangle = M. Then lim_{n->infinity} M^n = A173285 as a left-shifted vector.
A173284 * [1, 2, 3, ...] = A054451: (1, 1, 4, 5, 12, 17, 33, ...). - Gary W. Adamson, Mar 03 2010
From Johannes W. Meijer, Sep 05 2013: (Start)
Triangle read by rows formed from antidiagonals of triangle A104762.
The diagonal sums lead to A004695. (End)

			First few rows of the triangle:
    1;
    1;
    2,   1;
    3,   1;
    5,   2,  1;
    8,   3,  1;
   13,   5,  2,  1;
   21,   8,  3,  1;
   34,  13,  5,  2,  1;
   55,  21,  8,  3,  1;
   89,  34, 13,  5,  2, 1;
  144,  55, 21,  8,  3, 1;
  233,  89, 34, 13,  5, 2, 1;
  377, 144, 55, 21,  8, 3, 1;
  610, 233, 89, 34, 13, 5, 2, 1;
  ...

Cf. A000045, A004695, A052952, A054451, A173285.

Cf. (Similar triangles) A008315 (Catalan), A011973 (Pascal), A102541 (Losanitsch), A122196 (Fractal), A122197 (Fractal), A128099 (Pell-Jacobsthal), A152198, A152204, A207538, A209634.

T := proc(n, k): if n<0 then return(0) elif k < 0 or k > floor(n/2) then return(0) else combinat[fibonacci](n-2*k+1) fi: end: seq(seq(T(n, k), k=0..floor(n/2)), n=0..14); # Johannes W. Meijer, Sep 05 2013

Triangle by columns, Fibonacci numbers in every column shifted down twice, for k > 0.
From Johannes W. Meijer, Sep 05 2013: (Start)
T(n,k) = A000045(n-2*k+1), n >= 0 and 0 <= k <= floor(n/2).
T(n,k) = A104762(n-k, k). (End)

Term a(15) corrected by Johannes W. Meijer, Sep 05 2013

A152846 Triangle read by rows, A007318 rows repeated eight times .

Original entry on oeis.org

1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 2, 1, 1, 2, 1, 1, 2, 1, 1, 2, 1, 1, 2, 1, 1, 2, 1, 1, 2, 1, 1, 2, 1, 1, 3, 3, 1, 1, 3, 3, 1, 1, 3, 3, 1, 1, 3, 3, 1, 1, 3, 3, 1, 1, 3, 3, 1, 1, 3, 3, 1, 1, 3, 3, 1, 1, 4, 6, 4, 1, 1, 4, 6, 4, 1, 1, 4, 6, 4, 1, 1, 4, 6, 4, 1, 1, 4, 6, 4, 1

Offset: 0

Philippe Deléham, Dec 14 2008

Diagonal sums : A103376 .

			Triangle begins : 1 ; 1 ; 1 ; 1 ; 1 ; 1 ; 1 ; 1 ; 1,1 ; 1,1 ; 1,1 ; 1,1 ; 1,1 ; 1,1 ; 1,1 ; 1,1 ; 1,2,1 ; 1,2,1 ; 1,2,1 ; 1,2,1 ; 1,2,1 ; 1,2,1 ; 1,2,1 ; 1,2,1 ; 1,3,3,1 ; ...

Cf. A007318, A152198, A152815, A152828, A152830, A152831, A152844, A152845.

Flatten[Table[#, {8}] & /@ Table[Binomial[n, k], {n, 0, 10}, {k, 0, n}]] (* G. C. Greubel, May 03 2017 *)

A152847 Triangle read by rows, A007318 rows repeated nine times .

Original entry on oeis.org

1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 2, 1, 1, 2, 1, 1, 2, 1, 1, 2, 1, 1, 2, 1, 1, 2, 1, 1, 2, 1, 1, 2, 1, 1, 2, 1, 1, 3, 3, 1, 1, 3, 3, 1, 1, 3, 3, 1, 1, 3, 3, 1, 1, 3, 3, 1, 1, 3, 3, 1, 1, 3, 3, 1, 1, 3, 3, 1, 1, 3, 3, 1, 1, 4, 6, 4, 1, 1, 4, 6, 4, 1, 1, 4, 6, 4, 1

Offset: 0

Philippe Deléham, Dec 14 2008

Diagonal sums : A103377 .

			Triangle begins : 1 ; 1 ; 1 ; 1 ; 1 ; 1 ; 1 ; 1 ; 1 ; 1,1 ; 1,1 ; 1,1 ; 1,1 ; 1,1 ; 1,1 ; 1,1 ; 1,1 ; 1,1 ; 1,2,1 ; 1,2,1 ; 1,2,1 ; 1,2,1 ; 1,2,1 ; 1,2,1 ; 1,2,1 ; 1,2,1 ; 1,2,1 ; 1,3,3,1 ; ...

Cf. A007318, A152198, A152815, A152828, A152830, A152831, A152844, A152845, A152846.

Flatten[Table[#, {9}] & /@ Table[Binomial[n, k], {n, 0, 10}, {k, 0, n}]] (* G. C. Greubel, May 03 2017 *)

A152848 Triangle read by rows, A007318 rows repeated ten times .

Original entry on oeis.org

1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 2, 1, 1, 2, 1, 1, 2, 1, 1, 2, 1, 1, 2, 1, 1, 2, 1, 1, 2, 1, 1, 2, 1, 1, 2, 1, 1, 2, 1, 1, 3, 3, 1, 1, 3, 3, 1, 1, 3, 3, 1, 1, 3, 3, 1, 1, 3, 3, 1, 1, 3, 3, 1, 1, 3, 3, 1, 1, 3, 3, 1, 1, 3, 3, 1, 1, 3, 3, 1, 1, 4, 6, 4, 1

Offset: 0

Philippe Deléham, Dec 14 2008

Diagonal sums : A103378 .

			Triangle begins : 1 ; 1 ; 1 ; 1 ; 1 ; 1 ; 1 ; 1 ; 1 ; 1 ; 1,1 ; 1,1 ; 1,1 ; 1,1 ; 1,1 ; 1,1 ; 1,1 ; 1,1 ; 1,1 ; 1,1 ; 1,2,1 ; 1,2,1 ; 1,2,1 ; 1,2,1 ; 1,2,1 ; 1,2,1 ; 1,2,1 ; 1,2,1 ; 1,2,1 ; 1,2,1 ; 1,3,3,1 ; ...

Cf. A007318, A152198, A152815, A152828, A152830, A152831, A152844, A152845, A152846, A152847.

Flatten[Table[Table[Binomial[n,Range[0,n]],{10}],{n,0,4}]] (* Harvey P. Dale, May 31 2013 *)

A188440 Triangle T(n,k) read by rows: number of size-k antisymmetric subsets of {1,2,...,n}.

Original entry on oeis.org

1, 1, 1, 2, 1, 2, 1, 4, 4, 1, 4, 4, 1, 6, 12, 8, 1, 6, 12, 8, 1, 8, 24, 32, 16, 1, 8, 24, 32, 16, 1, 10, 40, 80, 80, 32, 1, 10, 40, 80, 80, 32, 1, 12, 60, 160, 240, 192, 64, 1, 12, 60, 160, 240, 192, 64, 1, 14, 84, 280, 560, 672, 448, 128, 1, 14, 84, 280

Offset: 0

Dennis P. Walsh, Mar 31 2011

A subset S of {1,2,...,n} is antisymmetric if x is an element of S implies n+1-x is not an element of S. In other words, the sum of any two elements of S does not equal n+1. For example, {1,2,5} is an antisymmetric subset of {1,2,3,4,5,6,7}. If n is odd, (n+1)/2 cannot be an element of an antisymmetric subset of {1,2,...,n}. (Note that for n=0, we define {1,...,n} to be the empty set, and thus T(0,0)=1 since the empty set is vacuously antisymmetric.)
We note, for example, that T(100,k) provides the number of possible size-k committees of the U.S. Senate in which no two members are from the same state.
Triangle, read by rows, A013609 rows repeated. - Philippe Deléham, Apr 09 2012
Triangle, with zeros omitted, given by (1, 0, -1, 0, 0, 0, 0, 0, 0, 0, ...) DELTA (0, 2, -2, 0, 0, 0, 0, 0, 0, 0, ...) where DELTA is the operator defined in A084938. - Philippe Deléham, Apr 09 2012

			Triangle T(n,k) initial values 0 <= k <= floor(n/2), n=0..13:
  1
  1
  1   2
  1   2
  1   4   4
  1   4   4
  1   6  12   8
  1   6  12   8
  1   8  24  32  16
  1   8  24  32  16
  1  10  40  80  80  32
  1  10  40  80  80  32
  1  12  60 160 240 192  64
  1  12  60 160 240 192  64
  ...
For n=7 and k=2, T(7,2)=12 since there are 12 antisymmetric size-2 subsets of {1,2,...,7}:
  {1,2}, {1,3}, {1,5}, {1,6}, {2,3}, {2,5},
  {2,7}, {3,6}, {3,7}, {5,6}, {5,7}, and {6,7}.
(1, 0, -1, 0, 0, 0, 0, ...) DELTA (0, 2, -2, 0, 0, 0, 0, ...) begins:
  1
  1   0
  1   2   0
  1   2   0   0
  1   4   4   0   0
  1   4   4   0   0   0
  1   6  12   8   0   0   0
  1   6  12   8   0   0   0   0
  1   8  24  32  16   0   0   0   0
  1   8  24  32  16   0   0   0   0   0
  1  10  40  80  80  32   0   0   0   0   0
  1  10  40  80  80  32   0   0   0   0   0   0
  1  12  60 160 240 192  64   0   0   0   0   0   0
  1  12  60 160 240 192  64   0   0   0   0   0   0   0
- _Philippe Deléham_, Apr 09 2012

T. D. Noe, Rows n = 0..100, flattened
Dennis Walsh, Notes on antisymmetric subsets of {1,2,...,n}

Cf. A108411, row sums of triangle T(n,k).

Cf. A000079, A007318, A013109, A152198

seq(seq(binomial(floor(n/2),k)*2^k,k=0..floor(n/2)),n=0..22);

Table[ CoefficientList[(1 + 2*x)^n, x] , {n, 0, 7}, {2}] // Flatten (* Jean-François Alcover, Aug 19 2013, after Philippe Deléham *)

T(n,k) = 2^k*C(floor(n/2),k) where C(*,*) denotes a binomial coefficient.
Sum(T(n,k),k=0..floor(n/2)) = 3^floor(n/2) = A108411(n).
G.f. for columns(k fixed):(2t^2)^k/((1-t)*(1-t^2)^k).
T(n,k) = A152198(n,k)*2^k. - Philippe Deléham, Apr 09 2012
G.f.: (1+x)/(1-x^2-2*y*x^2). - Philippe Deléham, Apr 09 2012
T(n,k) = T(n-2,k) + 2*T(n-2,k-1), T(0,0) = T(1,0) = 1, T(1,1) = 0 and T(n,k) = 0 if k<0 or if k>n.- Philippe Deléham, Apr 09 2012

A209634 Triangle with (1,4,7,10,13,16...,(3*n-2),...) in every column, shifted down twice.

Original entry on oeis.org

1, 4, 7, 1, 10, 4, 13, 7, 1, 16, 10, 4, 19, 13, 7, 1, 22, 16, 10, 4, 25, 19, 13, 7, 1, 28, 22, 16, 10, 4, 31, 25, 19, 13, 7, 1, 34, 28, 22, 16, 10, 4, 37, 31, 25, 19, 13, 7, 1, 40, 34, 28, 22, 16, 10, 4, 43, 37, 31, 25, 19, 13, 7, 1, 46, 40, 34, 28, 22, 16, 10

Offset: 1

Ctibor O. Zizka, Mar 11 2012

OEIS contains a lot of similar sequences, for example A152204, A122196, A173284.
Row sums for this sequence gives A006578.
In general, by given triangle with (A-B,2*A-B,...,A*n-B,...) in every column, shifted down K-times, we have the row sum s(n)= A*(n*n+K*n+nmodK)/(2*K) - B*(n+nmodK)/K. In this sequence K=2,A=3,B=2, in A152204 K=2,A=2,B=1.
No triangle with primes in every column, shifted down by K>=2 in OEIS, no row sums of it in OEIS.
From Johannes W. Meijer, Sep 28 2013: (Start)
Triangle read by rows formed from antidiagonals of triangle A143971.
The alternating row sums equal A004524(n+2) + 2*A004524(n+1).
The antidiagonal sums equal A171452(n+1). (End)

			Triangle:
1
4
7,  1
10, 4
13, 7,  1
16, 10, 4
19, 13, 7,  1
22, 16, 10, 4
25, 19, 13, 7,  1
28, 22, 16, 10, 4
...

Cf. A008315, A011973, A102541, A122196, A122197, A128099, A152198, A152204, A173284, A207538.

Cf. (Related to triangle sums) A006578, A000217, A002620, A004524, A171452.

T := (n, k) -> 3*n - 6*k + 4: seq(seq(T(n, k), k=1..floor((n+1)/2)), n=1..15); # Johannes W. Meijer, Sep 28 2013

From Johannes W. Meijer, Sep 28 2013: (Start)
T(n, k) = 3*n - 6*k + 4, n >= 1 and 1 <= k <= floor((n+1)/2).
T(n, k) = A143971(n-k+1, k), n >= 1 and 1 <= k <= floor((n+1)/2). (End)

A152849 Triangle read by rows, A007318 rows repeated eleven times .

Original entry on oeis.org

1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 2, 1, 1, 2, 1, 1, 2, 1, 1, 2, 1, 1, 2, 1, 1, 2, 1, 1, 2, 1, 1, 2, 1, 1, 2, 1, 1, 2, 1, 1, 2, 1, 1, 3, 3, 1, 1, 3, 3, 1, 1, 3, 3, 1, 1, 3, 3, 1, 1, 3, 3, 1, 1, 3, 3, 1, 1, 3, 3, 1, 1, 3, 3, 1, 1, 3, 3, 1, 1, 3, 3

Offset: 0

Philippe Deléham, Dec 14 2008

Diagonal sums : A103379 .

			Triangle begins : 1 ; 1 ; 1 ; 1 ; 1 ; 1 ; 1 ; 1 ; 1 ; 1 ; 1 ; 1,1 ; 1,1 ; 1,1 ; 1,1 ; 1,1 ; 1,1 ; 1,1 ; 1,1 ; 1,1 ; 1,1 ; 1,1 ; 1,2,1 ; 1,2,1 ; 1,2,1 ; 1,2,1 ; 1,2,1 ; 1,2,1 ; 1,2,1 ; 1,2,1 ; 1,2,1 ; 1,2,1 ; 1,2,1 ; 1,3,3,1 ; ...

Cf. A007318, A152198, A152815, A152828, A152830, A152831, A152844, A152845, A152846, A152847, A152848

Flatten[Table[#, {11}] & /@ Table[Binomial[n, k], {n, 0, 10}, {k, 0, n}]] (* G. C. Greubel, May 04 2017 *)

A152851 Triangle read by rows, A007318 rows repeated twelve times .

Original entry on oeis.org

1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 2, 1, 1, 2, 1, 1, 2, 1, 1, 2, 1, 1, 2, 1, 1, 2, 1, 1, 2, 1, 1, 2, 1, 1, 2, 1, 1, 2, 1, 1, 2, 1, 1, 2, 1, 1, 3, 3, 1, 1, 3, 3, 1, 1, 3, 3, 1, 1, 3, 3, 1, 1, 3, 3, 1, 1, 3, 3, 1, 1, 3, 3, 1, 1, 3, 3, 1, 1

Offset: 0

Philippe Deléham, Dec 14 2008

Diagonal sums : A103380 .

			Triangle begins : 1 ; 1 ; 1 ; 1 ; 1 ; 1 ; 1 ; 1 ; 1 ; 1 ; 1 ; 1 ; 1,1 ; 1,1 ; 1,1 ; 1,1 ; 1,1 ; 1,1 ; 1,1 ; 1,1 ; 1,1 ; 1,1 ; 1,1 ; 1,1 ; 1,2,1 ; 1,2,1 ; 1,2,1 ; 1,2,1 ; 1,2,1 ; 1,2,1 ; 1,2,1 ; 1,2,1 ; 1,2,1 ; 1,2,1 ; 1,2,1 ; 1,2,1 ; 1,3,3,1 ; ...

Cf. A007318, A152198, A152815, A152828, A152830, A152831, A152844, A152845, A152846, A152847, A152848, A152849

Flatten[Table[#, {12}] & /@ Table[Binomial[n, k], {n, 0, 10}, {k, 0, n}]] (* G. C. Greubel, May 04 2017 *)

cp's OEIS Frontend

A173284 Triangle by columns, Fibonacci numbers in every column shifted down twice, for k > 0.

Views

Author

Keywords

Comments

Examples

Crossrefs

Programs

Maple

Formula

Extensions

A152846 Triangle read by rows, A007318 rows repeated eight times .

Views

Author

Keywords

Comments

Examples

Crossrefs

Programs

Mathematica

A152847 Triangle read by rows, A007318 rows repeated nine times .

Views

Author

Keywords

Comments

Examples

Crossrefs

Programs

Mathematica

A152848 Triangle read by rows, A007318 rows repeated ten times .

Views

Author

Keywords

Comments

Examples

Crossrefs

Programs

Mathematica

A188440 Triangle T(n,k) read by rows: number of size-k antisymmetric subsets of {1,2,...,n}.

Views

Author

Keywords

Comments

Examples

Links

Crossrefs

Programs

Maple

Mathematica

Formula

A209634 Triangle with (1,4,7,10,13,16...,(3*n-2),...) in every column, shifted down twice.

Views

Author

Keywords

Comments

Examples

Crossrefs

Programs

Maple

Formula

A152849 Triangle read by rows, A007318 rows repeated eleven times .

Views

Author

Keywords

Comments

Examples

Crossrefs

Programs

Mathematica

A152851 Triangle read by rows, A007318 rows repeated twelve times .

Views

Author

Keywords

Comments

Examples

Crossrefs

Programs

Mathematica