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 A009196 #19 Feb 25 2018 20:39:28 %S A009196 1,1,0,3,6,15,195,126,6860,10581,275955,1581734,11684442,223836379, %T A009196 423165561,32439219242,10301267912,4976257880345,4959730228167, %U A009196 803695677341350,3521551886934550,131556027669677615,1743242423131143869,19663074849601180770 %N A009196 Expansion of e.g.f. exp(log(1+x)/cos(x)). %C A009196 Note that a(27) is negative. - _Vaclav Kotesovec_, Jan 24 2015 %H A009196 Andrew Howroyd, <a href="/A009196/b009196.txt">Table of n, a(n) for n = 0..200</a> %F A009196 a(n) ~ n! * (-1)^n / (GAMMA(-1/cos(1)) * n^(1+1/cos(1))) * (1 - sin(1)*log(n)/((cos(1))^2*n)*(1+1/cos(1))). - _Vaclav Kotesovec_, Jan 24 2015 %t A009196 Exp[ Log[ 1+x ]/Cos[ x ] ] %t A009196 CoefficientList[Series[(1 + x)^Sec[x], {x, 0, 20}], x] * Range[0, 20]! (* _Vaclav Kotesovec_, Jan 24 2015 *) %o A009196 (PARI) seq(n)={my(x='x+O('x^n)); Vec(serlaplace(exp(log(1+x)/cos(x))))} \\ _Andrew Howroyd_, Feb 25 2018 %K A009196 sign,easy %O A009196 0,4 %A A009196 _R. H. Hardin_ %E A009196 Extended with signs by _Olivier Gérard_, Mar 15 1997 %E A009196 a(22)-a(23) from _Andrew Howroyd_, Feb 25 2018