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 A296435 #12 Dec 21 2017 06:52:05
%S A296435 0,1,-1,1,-2,13,-64,173,-720,12409,-114816,370137,-1491456,88556037,
%T A296435 -1263184896,2668274373,21448022016,2491377242481,-50233550831616,
%U A296435 -34526890553679,5153298175033344,202383113207336829,-5453228045913292800,-25792743610973373219,1393299559788718325760
%N A296435 Expansion of e.g.f. log(1 + arcsinh(x)).
%H A296435 Robert Israel, <a href="/A296435/b296435.txt">Table of n, a(n) for n = 0..451</a>
%F A296435 E.g.f.: log(1 + log(x + sqrt(1 + x^2))).
%F A296435 a(n) ~ 4*(Pi*cos(Pi*n/2) + 2*sin(Pi*n/2)) * n^(n-1) / ((4 + Pi^2) * exp(n)). - _Vaclav Kotesovec_, Dec 21 2017
%e A296435 E.g.f.: A(x) = x/1! - x^2/2! + x^3/3! - 2*x^4/4! + 13*x^5/5! - 64*x^6/6! + ...
%p A296435 S:= series(ln(1+arcsinh(x)),x,51):
%p A296435 seq(coeff(S,x,j)*j!,j=0..50); # _Robert Israel_, Dec 12 2017
%t A296435 nmax = 24; CoefficientList[Series[Log[1 + ArcSinh[x]], {x, 0, nmax}], x] Range[0, nmax]!
%t A296435 nmax = 24; CoefficientList[Series[Log[1 + Log[x + Sqrt[1 + x^2]]], {x, 0, nmax}], x] Range[0, nmax]!
%o A296435 (PARI) Vecrev(Pol(serlaplace(log(1 + asinh(x + O(x^30)))))) \\ _Andrew Howroyd_, Dec 12 2017
%Y A296435 Cf. A001818, A003704, A110708, A189815, A202139, A296437.
%K A296435 sign
%O A296435 0,5
%A A296435 _Ilya Gutkovskiy_, Dec 12 2017