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-2 of 2 results.

A300453 Irregular triangle read by rows: row n consists of the coefficients of the expansion of the polynomial (x + 1)^n + x^2 - 1.

Original entry on oeis.org

0, 0, 1, 0, 1, 1, 0, 2, 2, 0, 3, 4, 1, 0, 4, 7, 4, 1, 0, 5, 11, 10, 5, 1, 0, 6, 16, 20, 15, 6, 1, 0, 7, 22, 35, 35, 21, 7, 1, 0, 8, 29, 56, 70, 56, 28, 8, 1, 0, 9, 37, 84, 126, 126, 84, 36, 9, 1, 0, 10, 46, 120, 210, 252, 210, 120, 45, 10, 1, 0, 11, 56, 165
Offset: 0

Views

Author

Keywords

Comments

This is essentially the usual Pascal triangle A007318, horizontally shifted and with the first three columns altered.
Let P(n;x) = (x + 1)^n + x^2 - 1. Then P(n;x) = P(n-1;x) + x*(x + 1)^(n - 1), with P(0;x) = x^2.
Let a (2,n)-torus knot be projected on the plane. The resulting projection is a planar diagram with n double points. Then, T(n,k) gives the number of state diagrams having k components that are obtained by deleting each double point, then pasting the edges in one of the two ways as shown below.
\ / \_/ \ / \ /
(1) \/ ==> (2) \/ ==> | |
/\ _ /\ | |
/ \ / \ / \ / \
See example for the case n = 2.

Examples

			The triangle T(n,k) begins
n\k  0   1   2    3     4     5     6     7     8     9    10   11  12  13 14
0:   0   0   1
1:   0   1   1
2:   0   2   2
3:   0   3   4    1
4:   0   4   7    4     1
5:   0   5  11   10     5     1
6:   0   6  16   20    15     6     1
7:   0   7  22   35    35    21     7     1
8:   0   8  29   56    70    56    28     8     1
9:   0   9  37   84   126   126    84    36     9     1
10:  0  10  46  120   210   252   210   120    45    10     1
11:  0  11  56  165   330   462   462   330   165    55    11    1
12:  0  12  67  220   495   792   924   792   495   220    66   12   1
13:  0  13  79  286   715  1287  1716  1716  1287   715   286   78  13   1
14:  0  14  92  364  1001  2002  3003  3432  3003  2002  1001  364  91  14  1
...
The states of the (2,2)-torus knot (Hopf Link) are the last four diagrams:
                                    ____  ____
                                   /    \/    \
                                  /     /\     \
                                 |     |  |     |
                                 |     |  |     |
                                  \     \/     /
                                   \____/\____/
                           ___    ____         __________
                         /    \  /    \       /    __    \
                        /     /  \     \     /    /  \    \
                       |      |  |      |   |     |  |     |
                       |      |  |      |   |     |  |     |
                        \      \/      /     \     \/     /
                         \_____/\_____/       \____/\____/
      ____    ____        ____    ____        ____________        __________
     /    \  /    \      /    \  /    \      /     __     \      /    __    \
    /     /  \     \    /     /  \     \    /     /  \     \    /    /  \    \
   |     |    |     |  |     |    |     |  |     |    |     |  |    |    |    |
   |     |    |     |  |     |    |     |  |     |    |     |  |    |    |    |
    \     \  /     /    \     \__/     /    \     \  /     /    \    \__/    /
     \____/  \____/      \____________/      \____/  \____/      \__________/
There are 2 diagrams that consist of two components, and 2 diagrams that consist of one component.
		

References

  • Colin Adams, The Knot Book, W. H. Freeman and Company, 1994.
  • Louis H. Kauffman, Knots and Physics, World Scientific Publishers, 1991.

Crossrefs

Row sums: A000079 (powers of 2).
Triangles related to the regular projection of some knots: A299989 (connected summed trefoils); A300184 (chain links); A300454 (twist knot).
When n = 3 (trefoil), the corresponding 4-tuplet (0,3,4,1) appears in several triangles: A030528 (row 5), A256130 (row 3), A128908 (row 3), A186084 (row 6), A284938 (row 7), A101603 (row 3), A155112 (row 3), A257566 (row 3).

Programs

  • Mathematica
    f[n_] := CoefficientList[ Expand[(x + 1)^n + x^2 - 1], x]; Array[f, 12, 0] // Flatten (* or *)
    CoefficientList[ CoefficientList[ Series[(x^2 + y*x/(1 - y*(x + 1)))/(1 - y), {y, 0, 11}, {x, 0, 11}], y], x] // Flatten (* Robert G. Wilson v, Mar 08 2018 *)
  • Maxima
    P(n, x) := (x + 1)^n + x^2 - 1$
    T : []$
    for i:0 thru 20 do
      T : append(T, makelist(ratcoef(P(i, x), x, n), n, 0, max(2, i)))$
    T;
    
  • PARI
    row(n) = Vecrev((x + 1)^n + x^2 - 1);
    tabl(nn) = for (n=0, nn, print(row(n))); \\ Michel Marcus, Mar 12 2018

Formula

T(n,1) = A001477(n).
T(n,2) = A152947(n).
T(n,k) = A007318(n,k-1), k >= 1.
T(n,0) = 0, T(0,1) = 1, T(0,2) = 1 and T(n,k) = T(n-1,k) + A007318(n-1,k-1).
G.f.: (x^2 + y*x/(1 - y*(x + 1)))/(1 - y).

A137396 Triangle read by rows: row n gives the coefficients in the expansion of the chromatic polynomial of the n-cycle graphs.

Original entry on oeis.org

0, 0, -1, 1, 0, 2, -3, 1, 0, -3, 6, -4, 1, 0, 4, -10, 10, -5, 1, 0, -5, 15, -20, 15, -6, 1, 0, 6, -21, 35, -35, 21, -7, 1, 0, -7, 28, -56, 70, -56, 28, -8, 1, 0, 8, -36, 84, -126, 126, -84, 36, -9, 1, 0, -9, 45, -120, 210, -252, 210, -120, 45, -10, 1, 0, 10
Offset: 1

Views

Author

Roger L. Bagula, Apr 10 2008

Keywords

Comments

The chromatic polynomial of an n-cycle graph is p(x;n) = (x - 1)^n + (-1)^n*(x - 1). - Franck Maminirina Ramaharo, Aug 11 2018

Examples

			Triangle begins:
n\k| 0   1    2     3     4     5     6     7     8    9   10 11
----------------------------------------------------------------
1  | 0
2  | 0  -1    1
3  | 0   2   -3     1
4  | 0  -3    6    -4     1
5  | 0   4  -10    10    -5     1
6  | 0  -5   15   -20    15    -6     1
7  | 0   6  -21    35   -35    21    -7     1
8  | 0  -7   28   -56    70   -56    28    -8     1
9  | 0   8  -36    84  -126   126   -84    36    -9    1
10 | 0  -9   45  -120   210  -252   210  -120    45  -10    1
11 | 0  10  -55   165  -330   462  -462   330  -165   55  -11  1
... reformatted and extended. - _Franck Maminirina Ramaharo_, Aug 11 2018
		

References

  • Louis H. Kauffman, Knots and Physics (Third Edition), World Scientific, 2001. See p. 353.

Crossrefs

Programs

  • Maxima
    t(n, k) := ratcoef((x - 1)^n + (-1)^n*(x - 1), x, k)$
    T:[0]$
    for n:2 thru 11 do T:append(T, makelist(t(n, k), k, 0, n))$
    T; /* Franck Maminirina Ramaharo, Aug 11 2018 */

Formula

p(x;n) = (x - 2)*p(x;n-1) + (x - 1)*p(x;n-2).
From Franck Maminirina Ramaharo, Aug 11 2018: (Start)
T(n,0) = 0 for n > 0, and T(n,1) = (n-1)*(-1)^(n-1) for n > 1.
T(n,k) = (-1)^(n - k)*binomial(n,k) for k > 1. (End)

Extensions

Edited, new name, and corrected by Franck Maminirina Ramaharo, Aug 11 2018
Showing 1-2 of 2 results.