login

Reminder: The OEIS is hiring a new managing editor, and the application deadline is January 26.

Integer part of Gamma(n+7/9)/Gamma(7/9).
7

%I #22 Sep 08 2022 08:44:44

%S 1,0,1,3,14,69,400,2714,21115,185345,1812263,19532170,230045568,

%T 2939471157,40499380396,598490843642,9442855533026,158430131720783,

%U 2816535675036146,52888281009012092,1046012668844905826

%N Integer part of Gamma(n+7/9)/Gamma(7/9).

%H G. C. Greubel, <a href="/A020065/b020065.txt">Table of n, a(n) for n = 0..445</a>

%p Digits := 64:f := proc(n,x) trunc(GAMMA(n+x)/GAMMA(x)); end;

%p seq(trunc(pochhammer(7/9,n)), n = 0..20); # _G. C. Greubel_, Nov 13 2019

%t IntegerPart[Pochhammer[7/9, Range[0, 20]]] (* _G. C. Greubel_, Nov 13 2019 *)

%o (PARI) P(n,x) = gamma(x+n)/gamma(x);

%o vector(21, n, truncate(P(n-1, 7/9)) ) \\ _G. C. Greubel_, Nov 13 2019

%o (Magma) [Truncate(Gamma(n+7/9)/Gamma(7/9)): n in [0..20]]; // _G. C. Greubel_, Nov 13 2019

%o (Sage) [int(rising_factorial(7/9, n)) for n in (0..20)] # _G. C. Greubel_, Nov 13 2019

%Y Cf. A020064, A020066, A020067, A020068, A020069.

%Y Cf. A020020, A020110.

%K nonn

%O 0,4

%A _Simon Plouffe_