OFFSET
3,1
COMMENTS
Also the number of 3-colorings of the P_{n-2} X P_n grid graph up to permutation of the colors. - Andrew Howroyd, Jun 26 2017
REFERENCES
Michael S. Paterson (Warwick), personal communication.
FORMULA
See A078099 for formula.
MATHEMATICA
M[1] = {{1}}; M[m_] := M[m] = {{M[m - 1], Transpose[M[m - 1]]}, {Array[0&, {2^(m - 2), 2^(m - 2)}], M[m - 1]}} // ArrayFlatten;
W[m_] := M[m] + Transpose[M[m]];
T[m_, 1] := 2^(m - 1); T[1, n_] := 2^(n - 1); T[m_, n_] := MatrixPower[ W[m], n - 1] // Flatten // Total;
a[n_] := T[n - 2, n]/2;
Table[a[n], {n, 3, 15}] (* Jean-François Alcover, Aug 27 2019 *)
CROSSREFS
KEYWORD
nonn
AUTHOR
N. J. A. Sloane, Dec 05 2002
EXTENSIONS
a(7)-a(14) from Alois P. Heinz, Mar 24 2009
Name clarified and a(15) from Andrew Howroyd, Jun 26 2017
STATUS
approved