login
A361877
a(n) = binomial(2*n, n) * binomial(2*n - 1, n).
2
1, 2, 18, 200, 2450, 31752, 426888, 5889312, 82818450, 1181952200, 17067389768, 248817153312, 3656229836168, 54086240180000, 804670797780000, 12030722505475200, 180648817621276050, 2722858995011344200, 41179040356653045000, 624643836545795220000, 9500832753861545296200
OFFSET
0,2
LINKS
FORMULA
a(n) = (4 - 2 / n)^2 * a(n - 1) for n >= 2.
a(n) = A002894(n)/2 for n >= 1. - Peter Bala, Mar 28 2023
MAPLE
A361877 := n -> binomial(2*n, n) * binomial(2*n - 1, n):
seq(A361877(n), n = 0..20);
# Alternative:
a := proc(n) option remember; ifelse(n < 2, n + 1, (4 - 2 / n)^2 * a(n - 1)) end:
seq(a(n), n = 0..20);
PROG
(PARI) a(n) = binomial(2*n, n) * binomial(2*n - 1, n); \\ Michel Marcus, Mar 28 2023
CROSSREFS
KEYWORD
nonn
AUTHOR
Peter Luschny, Mar 27 2023
STATUS
approved