This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.
%I A161202 #17 Sep 24 2024 14:15:07 %S A161202 1,-5,15,-5,-5,-3,-5,-5,-45,-55,-143,-195,-1105,-1615,-4845,-7429, %T A161202 -185725,-294975,-950475,-1550775,-10235115,-17058525,-57378675, %U A161202 -97294275,-1329688425,-2287064091,-7916760315,-13781027215 %N A161202 Numerators in expansion of (1-x)^(5/2). %H A161202 G. C. Greubel, <a href="/A161202/b161202.txt">Table of n, a(n) for n = 0..1000</a> %F A161202 a(n) = numerator( (15/(15-46*n+36*n^2-8*n^3))*binomial(2*n,n)/(4^n) ). %F A161202 a(n) = (-1)^n*numerator( binomial(5/2, n) ). - _G. C. Greubel_, Sep 24 2024 %t A161202 Numerator[CoefficientList[Series[(1-x)^(5/2),{x,0,30}],x]] (* _Harvey P. Dale_, Aug 22 2011 *) %t A161202 Table[(-1)^n*Numerator[Binomial[5/2, n]], {n,0,30}] (* _G. C. Greubel_, Sep 24 2024 *) %o A161202 (Magma) %o A161202 A161202:= func< n | -Numerator(15*(n+1)*Catalan(n)/(4^n*(2*n-1)*(2*n-3)*(2*n-5))) >; %o A161202 [A161202(n): n in [0..30]]; // _G. C. Greubel_, Sep 24 2024 %o A161202 (SageMath) %o A161202 def A161202(n): return (-1)^n*numerator(binomial(5/2,n)) %o A161202 [A161202(n) for n in range(31)] # _G. C. Greubel_, Sep 24 2024 %Y A161202 Cf. A046161 (denominators). %Y A161202 Cf. A161198 (triangle of coefficients of (1-x)^((-1-2*n)/2)). %Y A161202 Numerators of [x^n]( (1-x)^(p/2) ): this sequence (p=5), A161200 (p=3), A002596 (p=1), A001790 (p=-1), A001803 (p=-3), A161199 (p=-5), A161201 (p=-7). %K A161202 easy,sign,frac %O A161202 0,2 %A A161202 _Johannes W. Meijer_, Jun 08 2009