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

%I #16 Sep 23 2022 22:03:50

%S 1,0,0,0,1,3,17,104,740,6006,54717,553254,6147264,74450194,976124761,

%T 13774204959,208143541601,3353423725801,57380805974819,

%U 1039230152655058,19860842917407766,399423618672311730

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

%C Gamma(n + 1/9)/Gamma(1/9) = 1, 1/9, 10/81, 190/729, 5320/6561, 196840/59049, 9054640/531441, 498005200/4782969, ... - _R. J. Mathar_, Sep 04 2016

%H G. C. Greubel, <a href="/A020024/b020024.txt">Table of n, a(n) for n = 0..450</a>

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

%t Table[Round[Gamma[n + 1/9]/Gamma[1/9]], {n, 0, 50}] (* _G. C. Greubel_, Feb 03 2018 *)

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

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

%Y Cf. A020069, A020114.

%K nonn

%O 0,6

%A _Simon Plouffe_