|
%I #22 Sep 08 2022 08:44:43
%S 1,74,2775,70300,1353275,21111090,277962685,3176716400,32164253550,
%T 293052087900,2432332329570,18574174153080,131567066917650,
%U 870366750378300,5408707663065150,31731084956648880
%N Binomial coefficients C(n,73).
%H Michael De Vlieger, <a href="/A017737/b017737.txt">Table of n, a(n) for n = 73..10000</a>
%F From _G. C. Greubel_, Nov 09 2018: (Start)
%F G.f.: x^73/(1-x)^74.
%F E.g.f.: x^73*exp(x)/73!. (End)
%F From _Amiram Eldar_, Dec 18 2020: (Start)
%F Sum_{n>=73} 1/a(n) = 73/72.
%F Sum_{n>=73} (-1)^(n+1)/a(n) = A001787(73)*log(2) - A242091(73)/72! = 344732753249484100599808*log(2) - 6719341123837706799694333933410296397788866483772797 / 28120217838385627632757735656 = 0.9868333169... (End)
%t Array[Binomial[#, 73] &, 16, 73] (* _Michael De Vlieger_, Jul 06 2018 *)
%o (Sage) [binomial(n, 73) for n in range(73,89)] # _Zerinvary Lajos_, May 23 2009
%o (PARI) for(n=73, 90, print1(binomial(n,73), ", ")) \\ _G. C. Greubel_, Nov 09 2018
%o (Magma) [Binomial(n,73): n in [73..90]]; // _G. C. Greubel_, Nov 09 2018
%Y Cf. A001787, A242091.
%K nonn
%O 73,2
%A _N. J. A. Sloane_
|
