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 A009212 #15 Apr 01 2017 11:38:17 %S A009212 1,1,3,9,33,137,619,3017,15617,84625,474771,2723721,15730209,89487257, %T A009212 482793211,2259370697,6292321025,-41172399839,-1066104760797, %U A009212 -14517156416247,-163539106749663,-1652237279663959,-15169567281615221 %N A009212 E.g.f. exp(sin(x)*exp(x)). %F A009212 a(n)=2*sum(k=1..n, sum(j=0..(n-k)/2, binomial(n,n-k-2*j)*(k^(n-k-2*j)*sum(i=0..k/2, (2*i-k)^(k+2*j)*binomial(k,i)*(-1)^(k+j-i))))/(2^k*k!)), n>0, a(0)=1. - _Vladimir Kruchinin_, Jun 13 2011 %t A009212 Array[ SeriesCoefficient[ Series[ Exp[ Sin[ x ]*Exp[ x ] ], {x, 0, 30} ], # ]*#!&, 29, 0 ] %o A009212 (Maxima) %o A009212 a(n):=2*sum(sum(binomial(n,n-k-2*j)*(k^(n-k-2*j)*sum((2*i-k)^(k+2*j)*binomial(k,i)*(-1)^(k+j-i),i,0,k/2)),j,0,(n-k)/2)/(2^k*k!),k,1,n); /* _Vladimir Kruchinin_, Jun 13 2011 */ %K A009212 sign,easy %O A009212 0,3 %A A009212 _R. H. Hardin_ %E A009212 Extended with signs by _Olivier Gérard_, Mar 15 1997