[go: up one dir, main page]

login

Year-end appeal: Please make a donation to the OEIS Foundation to support ongoing development and maintenance of the OEIS. We are now in our 61st year, we have over 378,000 sequences, and we’ve reached 11,000 citations (which often say “discovered thanks to the OEIS”).

A300797
Number of strict trees of weight 2n + 1 in which all outdegrees and all leaves are odd.
3
1, 1, 1, 1, 2, 2, 4, 6, 11, 17, 34, 59, 118, 213, 424, 799, 1606, 3072, 6216, 12172, 24650, 48710, 99333, 198237, 405526, 815267, 1673127, 3387165, 6974702, 14179418, 29285048, 59841630, 123848399, 253927322, 526936694, 1084022437, 2253778793, 4649778115
OFFSET
0,5
COMMENTS
A strict tree of weight n > 0 is either a single node of weight n, or a sequence of two or more strict trees with strictly decreasing weights summing to n.
LINKS
EXAMPLE
The a(7) = 6 strict trees: 15, (11 3 1), (9 5 1), (7 5 3), ((7 3 1) 3 1), ((5 3 1) 5 1).
MATHEMATICA
a[n_]:=a[n]=If[OddQ[n], 1, 0]+Sum[Times@@a/@ptn, {ptn, Select[IntegerPartitions[n], Length[#]>1&&OddQ[Length[#]]&&UnsameQ@@#&]}];
Table[a[n], {n, 1, 60, 2}]
PROG
(PARI) seq(n)={my(v=vector(n)); for(n=1, n, v[n] = 1 + polcoef(prod(k=1, n-1, 1 + v[k]*x^(2*k-1) + O(x^(2*n))) - prod(k=1, n-1, 1 - v[k]*x^(2*k-1) + O(x^(2*n))), 2*n-1)/2); v} \\ Andrew Howroyd, Aug 26 2018
KEYWORD
nonn
AUTHOR
Gus Wiseman, Mar 13 2018
EXTENSIONS
a(30)-a(37) from Alois P. Heinz, Mar 13 2018
STATUS
approved