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 A362164 #13 Mar 18 2025 21:22:32 %S A362164 -1,-1,1,11,63,499,6089,97551,1875551,41846183,1062206289,30214274419, %T A362164 951599063711,32864817109851,1234766859596633,50132215859126519, %U A362164 2187063341006059839,102022039514031274831,5067161180856909388961,266960634868753685833563 %N A362164 Expansion of e.g.f. -exp(x * (1-3*x)^(1/3)). %F A362164 a(n) = - n! * Sum_{k=0..n} (-3)^k * binomial((n-k)/3,k)/(n-k)!. %t A362164 With[{nn=20},CoefficientList[Series[-Exp[x*CubeRoot[1-3x]],{x,0,nn}],x] Range[0,nn]!] (* _Harvey P. Dale_, Mar 18 2025 *) %o A362164 (PARI) my(N=20, x='x+O('x^N)); Vec(serlaplace(-exp(x*(1-3*x)^(1/3)))) %Y A362164 Cf. A362159, A362177. %K A362164 sign,easy %O A362164 0,4 %A A362164 _Seiichi Manyama_, Apr 10 2023