login
A348701
a(n) = Sum_{x_1+x_2+x_3+x_4=n, 0 <= x_1 <=x_2 <= x_3 <= x_4 <= n} (3*n)!/((n-x_1)! * (n-x_2)! * (n-x_3)! * (n-x_4)!).
3
1, 6, 270, 14280, 1027950, 49945896, 3576428856, 206746398144, 14538815734014, 856120482145500, 57732481295380320, 3504640795033499160, 243836930413853027160, 14665028066155264295400, 977424087385506563672160, 61042393779786411602842080
OFFSET
0,2
LINKS
Vaclav Kotesovec, Table of n, a(n) for n = 0..535 (terms 0..200 from Seiichi Manyama)
MATHEMATICA
Table[Sum[If[a + b + c + d == n, (3 n)!/((n - a)!*(n - b)!*(n - c)!*(n - d)!), 0], {a, 0, n}, {b, 0, a}, {c, 0, b}, {d, 0, c}], {n, 0, 15}] (* Michael De Vlieger, Oct 30 2021 *)
PROG
(PARI) a(n) = sum(a=0, n, sum(b=a, n, sum(c=b, n, sum(d=c, n, if(a+b+c+d==n, (3*n)!/((n-a)!*(n-b)!*(n-c)!*(n-d)!), 0)))));
CROSSREFS
KEYWORD
nonn
AUTHOR
Seiichi Manyama, Oct 30 2021
STATUS
approved