|
%I #10 Jul 29 2021 10:21:18
%S 1,252,204204,191222460,190004674860,195022529167752,
%T 204320742803699340,217111359982448115765,233102038867603938770220,
%U 252255185100017685406870560,274687728872310943504451521704,300625891932698784845526074953032,330384570746416514397560106035996940
%N a(n) = (9*n)!*n!/((5*n)!*(3*n)!*(2*n)!).
%F G.f.: hypergeom([1/9, 2/9, 4/9, 5/9, 7/9, 8/9], [1/5, 2/5, 1/2, 3/5, 4/5], 14348907/12500*x).
%t f[n_] := (9n)! n!/((5n)! (3n)! (2n)!); Array[f, 13, 0] (* or *) CoefficientList[ Series[ HypergeometricPFQ[{1/9, 2/9, 4/9, 5/9, 7/9, 8/9}, {1/5, 2/5, 1/2, 3/5, 4/5}, 14348907/12500 x], {x, 0, 12}], x] (* _Robert G. Wilson v_, Nov 23 2017 *)
%Y Cf. A295431.
%K nonn
%O 0,2
%A _Gheorghe Coserea_, Nov 23 2017
|
