A020003 - OEIS

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

%S 1,0,1,1,5,22,117,748,5549,46705,439803,4581280,52302950,649428294,

%T 8713162940,125614765716,1936560971460,31791875948135,553708506096682,

%U 10197464987280554,198000778503030764,4042515894436878102

%N Nearest integer to Gamma(n + 5/12)/Gamma(5/12).

%C Gamma(n + 5/12)/Gamma(5/12) = 1, 5/12, 85/144, 2465/1728, 101065/20736, 5356445/248832, 348168925/2985984,... - _R. J. Mathar_, Sep 04 2016

%H G. C. Greubel, <a href="/A020003/b020003.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 + 5/12]/Gamma[5/12]], {n, 0, 29}] (* _G. C. Greubel_, Jan 19 2018 *)

%o (PARI) for(n=0,30, print1(round(gamma(n+5/12)/gamma(5/12)), ", ")) \\ _G. C. Greubel_, Jan 19 2018

%o (Magma) [Round(Gamma(n +5/12)/Gamma(5/12)): n in [0..30]]; // _G. C. Greubel_, Jan 19 2018

%Y Cf. A020048, A020093.

%K nonn

%O 0,5

%A _Simon Plouffe_