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 A013155 #18 Jan 05 2024 14:49:31 %S A013155 1,2,3,6,21,90,495,3150,23625,198450,1885275,19646550,225935325, %T A013155 2809456650,37927664775,547844046750,8491582724625,139700231921250, %U A013155 2444754058621875,45123174910563750,879901910755993125,18004146789314936250,387089155970271129375,8696002899239114208750 %N A013155 Expansion of e.g.f. exp(arctanh(x)+log(x+1)). %H A013155 Andrew Howroyd, <a href="/A013155/b013155.txt">Table of n, a(n) for n = 0..200</a> %F A013155 a(n) = 2*a(n-1) + ((2-n)^2-1)*a(n-2). - _Christian Krause_, Jan 05 2024 %e A013155 G.f.= 1+2*x+3/2!*x^2+6/3!*x^3+21/4!*x^4+90/5!*x^5... %t A013155 With[{nn=20},CoefficientList[Series[Exp[ArcTanh[x]+Log[x+1]],{x,0,nn}],x] Range[0,nn]!] (* _Harvey P. Dale_, Oct 05 2021 *) %o A013155 (PARI) my(x='x+O('x^25)); Vec(serlaplace(exp(atanh(x)+log(x+1)))) \\ _Christian Krause_, Jan 05 2024 %Y A013155 a(2n+1) = 2 * A079484(n+1). %K A013155 nonn %O A013155 0,2 %A A013155 Patrick Demichel (patrick.demichel(AT)hp.com) %E A013155 Definition clarified by _Harvey P. Dale_, Oct 05 2021 %E A013155 Terms a(21) and beyond from _Andrew Howroyd_, Jan 05 2024