|
%I #16 Sep 08 2022 08:44:44
%S 1,0,1,3,13,64,369,2495,19338,169214,1649843,17735822,208395915,
%T 2657047923,36534408953,538882532060,8487399879954,142163947989232,
%U 2523410076808876,47313938940166438,934450294068287157
%N a(n) = floor( Gamma(n + 3/4)/Gamma(3/4) ).
%H G. C. Greubel, <a href="/A020086/b020086.txt">Table of n, a(n) for n = 0..449</a>
%p Digits:= 64: x:=3/4: f := proc(n,x) trunc(GAMMA(n+x)/GAMMA(x)); end;
%p seq(floor(pochhammer(3/4,n)), n = 0..25); # _G. C. Greubel_, Nov 17 2019
%t Floor[Pochhammer[3/4, Range[0, 25]]] (* _G. C. Greubel_, Nov 19 2018 *)
%o (PARI) vector(26, n, my(x=3/4); gamma(n-1+x)\gamma(x) ) \\ _G. C. Greubel_, Nov 19 2018
%o (Magma) [Truncate(Gamma(n + 3/4)/Gamma(3/4)): n in [0..30]]; // _G. C. Greubel_, Nov 19 2018
%o (Sage) [int(gamma(n + 3/4)/gamma(3/4)) for n in range(30)] # _G. C. Greubel_, Nov 19 2018
%Y Cf. A020041, A020131.
%K nonn
%O 0,4
%A _Simon Plouffe_
|
