The OEIS is supported by the many generous donors to the OEIS Foundation.
Reminder: The OEIS is hiring a new managing editor, and the application deadline is January 26.
Reminder: The OEIS is hiring a new managing editor, and the application deadline is January 26.
%I #16 Sep 23 2022 21:51:51
%S 1,1,1,4,15,69,401,2715,21115,185345,1812263,19532171,230045569,
%T 2939471158,40499380397,598490843643,9442855533027,158430131720783,
%U 2816535675036147,52888281009012092,1046012668844905826
%N Nearest integer to Gamma(n + 7/9)/Gamma(7/9).
%C Gamma(n + 7/9)/Gamma(7/9) = 1, 7/9, 112/81, 2800/729, 95200/6561, 4093600/59049, 212867200/531441, 12984899200/4782969, ... - _R. J. Mathar_, Sep 04 2016
%H G. C. Greubel, <a href="/A020020/b020020.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 Table[Round[Gamma[n + 7/9]/Gamma[7/9]], {n, 0, 50}] (* _G. C. Greubel_, Feb 03 2018 *)
%o (PARI) for(n=0,30, print1(round(gamma(n+7/9)/gamma(7/9)), ", ")) \\ _G. C. Greubel_, Feb 03 2018
%o (Magma) [Round(Gamma(n +7/9)/Gamma(7/9)): n in [0..30]]; // _G. C. Greubel_, Feb 03 2018
%Y Cf. A020065, A020110.
%K nonn
%O 0,4
%A _Simon Plouffe_