OFFSET
0,3
COMMENTS
Sum of entries in row n = 4*5^{n-1} + 4^{n-1} (n>=1) (see A235115).
In the Maple program P[n] gives the independence polynomial of the graph g_n.
LINKS
E. Mandrescu, Unimodality of some independence polynomials via their palindromicity, Australasian J. of Combinatorics, 53, 2012, 77-82.
D. Stevanovic, Graphs with palindromic independence polynomial, Graph Theory Notes of New York, 34, 1998, 31-36.
FORMULA
Generating polynomial of row n (n>=1) is x(1 + x)^{2n-2} + (1 + x)^2*(1 + 3*x + x^2)^{n-1} (it is palindromic).
Bivariate generating polynomial: G(x,z) = (1 - z - 2xz - x^2*z - x^2*z^2)/((1 - z - 2xz - x^2*z)(1 - z - 3xz - x^2*z)).
G(1/x, x^2*z) = G(x,z) (this implies the above mentioned palindromicity).
EXAMPLE
Row 1 is 1,3,1; indeed, S_1 is the one-vertex graph and after attaching two pendant vertices we obtain the path graph ABC; the independent vertex subsets are: empty, {A}, {B}, {C}, and {A, C}.
Triangle begins:
1;
1,3,1;
1,6,10,6,1;
1,9,28,40,28,9,1;
MAPLE
G := (1-z-2*x*z-x^2*z-x^2*z^2)/((1-z-2*x*z-x^2*z)*(1-z-3*x*z-x^2*z)): Gser := simplify(series(G, z = 0, 10)): for n from 0 to 9 do P[n] := sort(coeff(Gser, z, n)) end do: for n from 0 to 9 do seq(coeff(P[n], x, i), i = 0 .. 2*n) end do; # yields sequence in triangular form
CROSSREFS
KEYWORD
nonn,tabf
AUTHOR
Emeric Deutsch, Jan 13 2014
STATUS
approved