|
|
A005822
|
|
G.f.: x*(1-x^2)*(x^4+x^3-x^2+x+1) / (x^8-4*x^6-x^4-4*x^2+1).
(Formerly M1243)
|
|
2
|
|
|
0, 1, 1, 2, 4, 11, 16, 49, 72, 214, 319, 947, 1408, 4187, 6223, 18502, 27504, 81769, 121552, 361379, 537196, 1597106, 2374129, 7058377, 10492416, 31194361, 46371025, 137862866, 204935836, 609282227, 905709904, 2692710841, 4002767136, 11900382694, 17690150767
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
0,4
|
|
COMMENTS
|
This is a rescaled version of the number of spanning trees in the cube of an n-cycle. See A331905 for details. - N. J. A. Sloane, Feb 06 2020
|
|
REFERENCES
|
N. J. A. Sloane and Simon Plouffe, The Encyclopedia of Integer Sequences, Academic Press, 1995 (includes this sequence).
|
|
LINKS
|
|
|
MAPLE
|
A005822:=-z*(z-1)*(1+z)*(z**4+z**3-z**2+z+1)/(-4*z**6-z**4-4*z**2+1+z**8); # [Conjectured (correctly) by Simon Plouffe in his 1992 dissertation; adapted to offset 0 by Georg Fischer, Jan 27 2020]
|
|
MATHEMATICA
|
CoefficientList[Series[x (1 - x^2) (x^4 + x^3 - x^2 + x + 1) / (x^8 - 4 x^6 - x^4 - 4 x^2 + 1), {x, 0, 35}], x] (* Vincenzo Librandi, Jan 28 2020 *)
|
|
PROG
|
(PARI) Vec(-x*(x-1)*(x+1)*(x^4+x^3-x^2+x+1)/(x^8-4*x^6-x^4-4*x^2+1) + O(x^50)) \\ Colin Barker, Jul 09 2015
(Magma) m:=40; R<x>:=PowerSeriesRing(Rationals(), m); [0] cat Coefficients(R!( x*(1-x^2)*(x^4+x^3-x^2+x+1) / (x^8-4*x^6-x^4-4*x^2+1))); // Vincenzo Librandi, Jan 28 2020
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn,easy
|
|
AUTHOR
|
|
|
EXTENSIONS
|
|
|
STATUS
|
approved
|
|
|
|