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 A037953 #18 Oct 23 2023 12:55:16 %S A037953 0,0,0,0,0,1,1,7,8,36,45,165,220,715,1001,3003,4368,12376,18564,50388, %T A037953 77520,203490,319770,817190,1307504,3268760,5311735,13037895,21474180, %U A037953 51895935,86493225,206253075 %N A037953 a(n) = binomial(n, floor((n-5)/2)). %H A037953 G. C. Greubel, <a href="/A037953/b037953.txt">Table of n, a(n) for n = 0..1000</a> %F A037953 a(n) = binomial(n, A004526(n-5)). - _Wesley Ivan Hurt_, Nov 28 2013 %F A037953 (n+6)*(n-5)*a(n) = 2*(n)*a(n-1) + 4*(n-1)*n*a(n-2). - _R. J. Mathar_, Jul 26 2015 %F A037953 From _G. C. Greubel_, Jun 21 2022: (Start) %F A037953 G.f.: ((1 +x -6*x^2 -5*x^3 +9*x^4 +5*x^5 -2*x^6) - (1 +x -4*x^2 -3*x^3 +3*x^4 +x^5)*sqrt(1-4*x^2))/(2*x^6*sqrt(1-4*x^2)). %F A037953 E.g.f.: BesselI(5, 2*x) + BesselI(6, 2*x). (End) %p A037953 A037953:=n->binomial(n, floor((n-5)/2)); seq(A037953(n), n=0..50); # _Wesley Ivan Hurt_, Nov 28 2013 %t A037953 Table[Binomial[n,Floor[(n-5)/2]],{n,0,40}] (* _Harvey P. Dale_, Oct 11 2012 *) %o A037953 (Magma) [Binomial(n, Floor((n-5)/2)): n in [0..40]]; // _G. C. Greubel_, Jun 21 2022 %o A037953 (SageMath) [binomial(n, (n-5)//2) for n in (0..40)] # _G. C. Greubel_, Jun 21 2022 %o A037953 (PARI) a(n)=binomial(n,(n-5)\2) \\ _Charles R Greathouse IV_, Oct 23 2023 %Y A037953 Cf. A035951, A035952, A035954, A035955, A035956, A035957. %Y A037953 Cf. A004526, A089940, A101491. %K A037953 nonn %O A037953 0,8 %A A037953 _N. J. A. Sloane_