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 A008992 #28 Mar 16 2020 14:24:23 %S A008992 1,12,1440,24192,29030400,5677056,4649508864000,100429391462400, %T A008992 39023992111104000,100609855353520128000,8632325589332026982400000, %U A008992 6946127879462505676800000,3060839851788186207387648000000 %N A008992 Denominators of coefficients in expansion of sqrt(sin(x)/x) (even powers only). %H A008992 G. C. Greubel, <a href="/A008992/b008992.txt">Table of n, a(n) for n = 0..210</a> %p A008992 A008992 := n -> denom(coeff(taylor(sqrt(sin(x)/x), x, 2*n+2), x, 2*n)): seq(A008992(n), n=0..12); # _Johannes W. Meijer_, Feb 10 2013 %t A008992 Denominator[CoefficientList[Series[Sqrt[Sin[x]/x], {x, 0, 50}], x][[1 ;; -1 ;; 2]]] (* _G. C. Greubel_, Jul 21 2018 *) %o A008992 (Sage) %o A008992 length = 12; T = taylor(sqrt(sin(x)/x),x,0,2*length+2) %o A008992 [T.coefficient(x,2*n).denominator() for n in (0..length)] %o A008992 # _Peter Luschny_, Dec 13 2012 %Y A008992 Numerators are in A008991. %Y A008992 Appears in A220002 and A220466. %K A008992 nonn %O A008992 0,2 %A A008992 _N. J. A. Sloane_