The OEIS is supported by the many generous donors to the OEIS Foundation.
%I #14 Jun 23 2015 21:41:06
%S 0,1,1,2,-4,-1,-69,321,-1744,17289,-151169,1476925,-16575340,
%T 199103189,-2588516917,36353994873,-546329845632,8754613833201,
%U -149061793849185,2686816882818229,-51112881539898028,1023425692313274509
%N Expansion of log(1+x)*exp(sin(x)).
%F a(n) ~ (n-1)! * (-1)^(n+1) * exp(-sin(1)). - _Vaclav Kotesovec_, Jan 23 2015
%t Log[ 1+x ]*Exp[ Sin[ x ] ]
%t CoefficientList[Series[E^Sin[x]*Log[1 + x], {x, 0, 20}], x] * Range[0, 20]! (* _Vaclav Kotesovec_, Jan 23 2015 *)
%K sign,easy
%O 0,4
%A _R. H. Hardin_
%E Extended with signs by _Olivier Gérard_, Mar 15 1997