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

A289475
Number of Dyck paths of semilength 5*n and height n.
2
1, 1, 511, 497845, 517884748, 517500496981, 492342898340494, 450205866074148509, 399858332322926629152, 347831920544342751131378, 298149337418229660486879546, 252909751775727886411508895575, 212950273659595164912087912232227
OFFSET
0,3
LINKS
FORMULA
a(n) ~ 5^(10*n + 1/2) / (2^(4*n + 3/2) * 3^(6*n + 7/2) * sqrt(Pi*n)). - Vaclav Kotesovec, Jul 14 2017
MAPLE
b:= proc(x, y, k) option remember;
`if`(x=0, 1, `if`(y>0, b(x-1, y-1, k), 0)+
`if`(y < min(x-1, k), b(x-1, y+1, k), 0))
end:
a:= n-> `if`(n=0, 1, b(10*n, 0, n)-b(10*n, 0, n-1)):
seq(a(n), n=0..20);
MATHEMATICA
b[x_, y_, k_]:=b[x, y, k]=If[x==0, 1, If[y>0, b[x - 1, y - 1, k], 0] + If[y<Min[x - 1, k], b[x - 1, y + 1, k], 0]]; a[n_]:=a[n]=If[n==0, 1, b[10n, 0, n] - b[10n, 0, n - 1]]; Table[a[n], {n, 0, 20}] (* Indranil Ghosh, Jul 08 2017 *)
CROSSREFS
Column k=5 of A289481.
Sequence in context: A022191 A069384 A069410 * A069436 A217915 A263167
KEYWORD
nonn
AUTHOR
Alois P. Heinz, Jul 06 2017
STATUS
approved