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.

A010372 Number of unrooted quartic trees with n (unlabeled) nodes and possessing a centroid; number of n-carbon alkanes C(n)H(2n +2) with a centroid ignoring stereoisomers.

Original entry on oeis.org

1, 0, 1, 1, 3, 2, 9, 8, 35, 39, 159, 202, 802, 1078, 4347, 6354, 24894, 38157, 148284, 237541, 910726, 1511717, 5731580, 9816092, 36797588, 64658432, 240215803, 431987953, 1590507121, 2917928218, 10660307791, 19910436898
Offset: 1

Views

Author

Keywords

Comments

The degree of each node is <= 4.
A centroid is a node with less than n/2 nodes in each of the incident subtrees, where n is the number of nodes in the tree. If a centroid exists it is unique.
Ignoring stereoisomers means that the children of a node are unordered. They can be permuted in any way and it is still the same tree. See A086194 for the analogous sequence with stereoisomers counted.

References

  • F. Harary, Graph Theory, p. 36, for definition of centroid.

Crossrefs

A000602(n) = a(n) + A010373(n/2) for n even, A000602(n) = a(n) for n odd.

Programs

  • Maple
    with(combstruct): Alkyl := proc(n) combstruct[count]([ U,{U=Prod(Z,Set(U,card<=3))},unlabeled ],size=n) end:
    centeredHC := proc(n) option remember; local f,k,z,f2,f3,f4; f := 1 + add(Alkyl(k)*z^k, k=0..iquo(n-1,2));
    f2 := series(subs(z=z^2,f), z, n+1); f3 := series(subs(z=z^3,f), z, n+1); f4 := series(subs(z=z^4,f), z, n+1);
    f := series(f*f3/3+f4/4+f2^2/8+f2*f^2/4+f^4/24, z, n+1); coeff(f, z, n-1) end: seq(centeredHC(n), n=1..32);

Extensions

Description revised by Steve Strand (snstrand(AT)comcast.net), Aug 20 2003