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 A293118 #13 Sep 30 2017 18:47:13 %S A293118 1,0,0,-6,-24,-120,-360,0,20160,302400,3628800,39916800,419126400, %T A293118 4151347200,36324288000,207048441600,-1743565824000,-103742166528000, %U A293118 -2925529096089600,-69945932735078400,-1571249213614080000,-34354603773794304000,-741528257908838400000 %N A293118 E.g.f.: exp(x^3/(x-1)). %H A293118 Seiichi Manyama, <a href="/A293118/b293118.txt">Table of n, a(n) for n = 0..450</a> %p A293118 a:= proc(n) option remember; `if`(n=0, 1, -add( %p A293118 a(n-j)*binomial(n-1, j-1)*j!, j=3..n)) %p A293118 end: %p A293118 seq(a(n), n=0..25); # _Alois P. Heinz_, Sep 30 2017 %t A293118 CoefficientList[Series[E^(-x^3/(1-x)), {x, 0, 20}], x] * Range[0, 20]! (* _Vaclav Kotesovec_, Sep 30 2017 *) %o A293118 (PARI) x='x+O('x^66); Vec(serlaplace(exp(x^3/(x-1)))) %Y A293118 Column k=2 of A293119. %Y A293118 Cf. A293049. %K A293118 sign %O A293118 0,4 %A A293118 _Seiichi Manyama_, Sep 30 2017