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 A190196 #22 Sep 19 2023 09:14:18
%S A190196 1,4,96,5760,645120,16588800,30656102400,11158821273600,
%T A190196 109310902272000,3278015337332736000,191637819720990720000,
%U A190196 25296192203170775040000,2541356653499348743618560000,3303763649549153366704128000000,713612948302617127208091648000000
%N A190196 Denominators of a Taylor series expansion of 1/sqrt(cosh(x)) (even powers only).
%H A190196 Vincenzo Librandi, <a href="/A190196/b190196.txt">Table of n, a(n) for n = 0..100</a>
%H A190196 Philippe Flajolet, Xavier Gourdon, and Philippe Dumas, <a href="https://doi.org/10.1016/0304-3975(95)00002-E">Mellin transforms and asymptotics: harmonic sums</a>, Special volume on mathematical analysis of algorithms. Theoret. Comput. Sci. 144 (1995), no. 1-2, 3-58.
%e A190196 1/sqrt(cosh(x)) = 1-(1/4)*x^2+(7/96)*x^4-(139/5760)*x^6+(5473/645120)*x^8-(51103/16588800)*x^10+...
%p A190196 a:= n-> denom(coeff(series(1/sqrt(cosh(x)),x,2*n+1),x,2*n)):
%p A190196 seq(a(n), n=0..19); # _Alois P. Heinz_, Sep 19 2023
%t A190196 Denominator[Take[CoefficientList[Series[1/Sqrt[Cosh[x]],{x,0,40}],x],{1,-1,2}]] (* _Harvey P. Dale_, Feb 04 2012 *)
%Y A190196 Cf. A190195.
%K A190196 nonn,frac
%O A190196 0,2
%A A190196 _N. J. A. Sloane_, May 05 2011