%I #18 Sep 23 2022 21:51:43

%S 1,0,0,1,3,13,67,425,3103,25751,239483,2466678,27873456,342843514,

%T 4559818741,65205407995,997642742322,16261576699844,281325276907304,

%U 5148252567403659,99361274550890613,2017033873383079454

%N Nearest integer to Gamma(n + 3/10)/Gamma(3/10).

%C Gamma(n + 3/10)/Gamma(3/10) = 1, 3/10, 39/100, 897/1000, 29601/10000, 1272843/100000, 67460679/1000000, ... - _R. J. Mathar_, Sep 04 2016

%H G. C. Greubel, <a href="/A020017/b020017.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 + 3/10]/Gamma[3/10]], {n, 0, 50}] (* _G. C. Greubel_, Jan 20 2018 *)

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

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

%Y Cf. A020062, A020107.

%K nonn

%O 0,5

%A _Simon Plouffe_