login
The OEIS is supported by the many generous donors to the OEIS Foundation.

 

Logo
Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A093730 Antidiagonal sums of triangle A093729, which enumerates the number of nodes in the tree of tournament sequences. 2
1, 1, 2, 5, 18, 102, 949, 14731, 386060, 17323052, 1351157580, 185867701560, 45682244004244, 20283964291276804, 16423005586691362832, 24434416299840231799694, 67236458264587977465709983 (list; graph; refs; listen; history; text; internal format)
OFFSET
0,3
COMMENTS
Related to A008934 (the number of tournament sequences).
LINKS
M. Cook and M. Kleber, Tournament sequences and Meeussen sequences, Electronic J. Comb. 7 (2000), #R44.
FORMULA
a(n) = Sum_{k=0..n} A093729(n-k, k).
MATHEMATICA
T[n_, k_] := T[n, k] = If[n<0, 0, If[n==0, 1, If[k==0, 0, If[k<=n, T[n, k-1] - T[n-1, k] + T[n-1, 2*k-1] + T[n-1, 2*k], Sum[(-1)^(j-1) * Binomial[n+1, j]*T[n, k-j], {j, 1, n+1}]]]]]; a[n_] := Sum[T[n-k, k], {k, 0, n}]; Table[a[n], {n, 0, 16}] (* Jean-François Alcover, Oct 06 2016, translated from PARI *)
PROG
(PARI) {T(n, k)=if(n<0, 0, if(n==0, 1, if(k==0, 0, if(k<=n, T(n, k-1)-T(n-1, k)+T(n-1, 2*k-1)+T(n-1, 2*k), sum(j=1, n+1, (-1)^(j-1)*binomial(n+1, j)*T(n, k-j))))))}
a(n)=sum(k=0, n, T(n-k, k))
(SageMath)
@CachedFunction
def T(n, k): # T = A093729
if n<0: return 0
elif n==0: return 1
elif k==0: return 0
elif k<n+1: return T(n, k-1) - T(n-1, k) + T(n-1, 2*k-1) + T(n-1, 2*k)
else: return sum((-1)^(j-1)*binomial(n+1, j)*T(n, k-j) for j in range(1, n+2))
def A093730(n): return sum(T(n-k, k) for k in range(n+1))
[A093730(n) for n in range(31)] # G. C. Greubel, Feb 22 2024
CROSSREFS
Sequence in context: A007127 A279207 A005639 * A366449 A304918 A007769
KEYWORD
nonn
AUTHOR
Paul D. Hanna, Apr 14 2004
STATUS
approved

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Style Sheet | Transforms | Superseeker | Recents
The OEIS Community | Maintained by The OEIS Foundation Inc.

License Agreements, Terms of Use, Privacy Policy. .

Last modified March 29 11:14 EDT 2024. Contains 371278 sequences. (Running on oeis4.)