|
%I #24 Sep 08 2022 08:44:43
%S 1,86,3741,109736,2441626,43949268,666563898,8760554088,101841441273,
%T 1063677275518,10104934117421,88188515933856,712857170465336,
%U 5373846361969456,38000770702498296,253338471349988640
%N Binomial coefficients C(n,85).
%H Michael De Vlieger, <a href="/A017749/b017749.txt">Table of n, a(n) for n = 85..10000</a>
%F From _G. C. Greubel_, Nov 10 2018: (Start)
%F G.f.: x^85/(1-x)^86.
%F E.g.f.: x^85*exp(x)/85!. (End)
%F From _Amiram Eldar_, Dec 20 2020: (Start)
%F Sum_{n>=85} 1/a(n) = 85/84.
%F Sum_{n>=85} (-1)^(n+1)/a(n) = A001787(85)*log(2) - A242091(85)/84! = 1644139114675895677600399360*log(2) - 6767419353446990359387534774224303418673702374958256693151691 / 5938258054738015988966228164780860 = 0.9886306766... (End)
%p seq(binomial(n,85),n=85..100); # _Muniru A Asiru_, Nov 11 2018
%t Array[Binomial[#, 85] &, 16, 85] (* _Michael De Vlieger_, Jul 06 2018 *)
%o (Sage) [binomial(n, 85) for n in range(85,101)] # _Zerinvary Lajos_, May 23 2009
%o (PARI) for(n=85, 105, print1(binomial(n,85), ", ")) \\ _G. C. Greubel_, Nov 10 2018
%o (Magma) [Binomial(n,85): n in [85..105]]; // _G. C. Greubel_, Nov 10 2018
%o (GAP) List([85..100], n->Binomial(n,85)); # _Muniru A Asiru_, Nov 11 2018
%Y Cf. A001787, A242091.
%K nonn
%O 85,2
%A _N. J. A. Sloane_
|
