A013309 - OEIS

%I #7 Oct 24 2016 14:02:42

%S 1,1,3,8,29,112,489,2326,11937,65856,386561,2406230,15805473,

%T 109131128,789751577,5972149246,47079466913,386051624736,

%U 3286313327105,28991306290278,264621015301489,2495440610319944

%N Expansion of e.g.f.: exp(exp(x)-cos(x))=1+x+3/2!*x^2+8/3!*x^3+29/4!*x^4+112/5!*x^5...

%t With[{nn=30},CoefficientList[Series[Exp[Exp[x]-Cos[x]],{x,0,nn}],x] Range[ 0,nn]!] (* _Harvey P. Dale_, Oct 24 2016 *)

%K nonn

%O 0,3

%A Patrick Demichel (patrick.demichel(AT)hp.com)

%E Definition clarified by _Harvey P. Dale_, Oct 24 2016