login
Nearest integer to Gamma(n + 8/9)/Gamma(8/9).
2

%I #21 Sep 23 2022 17:10:03

%S 1,1,2,5,19,92,543,3741,29513,262341,2594262,28248627,335844793,

%T 4328666215,60120364101,895125421053,14222548356739,240203038913808,

%U 4296965473902563,81164903395937306,1614279745319197539,33720510235556570814

%N Nearest integer to Gamma(n + 8/9)/Gamma(8/9).

%C Gamma(n + 8/9)/Gamma(8/9) = 1, 8/9, 136/81, 3536/729, 123760/6561, 5445440/59049, 288608320/531441, 17893715840/4782969, ...

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

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

%t f[n_] := Round[Gamma[n + 8/9]/Gamma[8/9]]; Array[f, 22, 0] (* _Robert G. Wilson v_, Sep 13 2013 *)

%o (PARI) for(n=0,30, print1(round(gamma(n+8/9)/gamma(8/9)), ", ")) \\ _G. C. Greubel_, Feb 03 2018

%o (Magma) [Round(Gamma(n +8/9)/Gamma(8/9)): n in [0..30]]; // _G. C. Greubel_, Feb 03 2018

%Y Cf. A049211, A020064, A020109.

%K nonn

%O 0,3

%A _Simon Plouffe_