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”).

A019498
Number of 4-ary search trees on n keys.
0
1, 1, 1, 1, 4, 10, 20, 47, 128, 340, 868, 2275, 6188, 16922, 46112, 126613, 351568, 981622, 2747876, 7723250, 21811856, 61828886, 175752728, 500984606, 1432111244, 4104175970, 11787811340, 33926475162, 97837209036, 282662156478, 818022923184, 2371103693427
OFFSET
0,5
LINKS
MAPLE
A:= proc(n) option remember; if n=0 then 1 else convert(series(sum(x^i, i=0..2)+ x^3*A(n-1)^4, x=0, n+1), polynom) fi end: a:= n-> coeff(A(n), x, n): seq(a(n), n=0..40); # Alois P. Heinz, Aug 22 2008
MATHEMATICA
A[n_] := A[n] = If[n==0, 1, Series[1 + x + x^2 + x^3*A[n-1]^4, {x, 0, n+1}] // Normal]; a[n_] := Coefficient[A[n], x, n]; Table[a[n], {n, 0, 40}] (* Jean-François Alcover, Feb 19 2016, after Alois P. Heinz *)
CROSSREFS
Sequence in context: A048008 A048019 A189586 * A237626 A020149 A056412
KEYWORD
nonn
AUTHOR
James Fill (jimfill(AT)jhu.edu)
EXTENSIONS
More terms from Alois P. Heinz, Aug 22 2008
STATUS
approved