OFFSET
0,2
LINKS
Vincenzo Librandi, Table of n, a(n) for n = 0..200
FORMULA
a(n) = RisingFactorial(3*n,n) = A124320(3*n,n) = n! * binomial(4*n-1,n).
a(n) = n! * [x^n] 1/(1 - x)^(3*n).
a(n) = (3/4) * A061924(n) for n > 0.
a(n) ~ 2^(8*n-1) * n^n / (3^(3*n-1/2) * exp(n)). - Amiram Eldar, Dec 08 2025
MATHEMATICA
a[n_]:=Product[(3*n+k), {k, 0, n-1}]; Table[a[n], {n, 0, 15}] (* Vincenzo Librandi, May 22 2025 *)
a[n_] := n! * Binomial[4*n-1, n]; Array[a, 18, 0] (* Amiram Eldar, Dec 08 2025 *)
PROG
(PARI) a(n) = prod(k=0, n-1, 3*n+k);
(SageMath)
def a(n): return rising_factorial(3*n, n)
(Python)
from sympy import rf
def A384164(n): return rf(3*n, n) # Chai Wah Wu, May 21 2025
(Magma) [1] cat [&*[(3*n + k): k in [0..n-1]]: n in [1..16]]; // Vincenzo Librandi, May 22 2025
CROSSREFS
KEYWORD
nonn,easy
AUTHOR
Seiichi Manyama, May 21 2025
STATUS
approved
