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 A354518 #22 Aug 17 2022 10:27:13
%S A354518 1,0,1,3,7,30,166,798,4117,27660,196756,1328448,9866407,86205210,
%T A354518 759842266,6460661028,60841732777,651349676280,6795873687496,
%U A354518 67981177154688,770224145659627,9854500496860470,116983085896035646,1301594922821009028,17440543467561038557
%N A354518 Expansion of e.g.f. cosh(x)^exp(x).
%C A354518 a(39) is negative. - _Vaclav Kotesovec_, Aug 17 2022
%H A354518 Seiichi Manyama, <a href="/A354518/b354518.txt">Table of n, a(n) for n = 0..486</a>
%F A354518 a(0) = 1; a(n) = Sum_{k=1..n} A354520(k) * binomial(n-1,k-1) * a(n-k).
%o A354518 (PARI) my(N=30, x='x+O('x^N)); Vec(serlaplace(cosh(x)^exp(x)))
%o A354518 (PARI) a354520(n) = sum(k=1, n\2, (16^k-4^k)*bernfrac(2*k)/(2*k)*binomial(n, 2*k));
%o A354518 a_vector(n) = my(v=vector(n+1)); v[1]=1; for(i=1, n, v[i+1]=sum(j=1, i, a354520(j)*binomial(i-1, j-1)*v[i-j+1])); v;
%Y A354518 Cf. A000248, A003727, A215518, A354517, A354520.
%K A354518 sign
%O A354518 0,4
%A A354518 _Seiichi Manyama_, Aug 16 2022