Re: Problem with an integral
- To: mathgroup at smc.vnet.net
- Subject: [mg95618] Re: Problem with an integral
- From: Jens-Peer Kuska <kuska at informatik.uni-leipzig.de>
- Date: Thu, 22 Jan 2009 07:14:50 -0500 (EST)
- Organization: Uni Leipzig
- References: <gl72ql$cpm$1@smc.vnet.net>
- Reply-to: kuska at informatik.uni-leipzig.de
Hi, Mathematica can't find a closed form for unknown n and integral[nn_]:= FullSimplify[ Assuming[{k > 0 && Element[k, Integers]}, Integrate[Evaluate[fun/. n->nn], {x, 0, \[Infinity]}]]] give you analytic, and finite results for the corresponding n Regards Jens Jepessen wrote: > Hi. > > I'm working with a little problem in Mathematica 7.0.0. > I want to integrate this function > > fun = x^(n + 1)*E^(-x + (I*k)/x) > > Assuming that both n and k are greater than zero, I write > > integral = FullSimplify[Assuming[{k > 0, n > 0}, Integrate[fun, {x, 0, > \[Infinity]}]]] > > And I obtain a symbolic result. > But, when I want to put some specific value, like this > > integral /. {n -> 1, k -> 1} > > I obtain always ComplexInfinity, and/or other errors. > So, I've tried to evaluate numerically the integral for the same > specific values, in this way > > NIntegrate[Evaluate[fun /. {n -> 1, k -> 1}], {x, 0, \[Infinity]}] > > And I obtain a finite numeric result. So, there's some error in > symbolic computation, or I miss something when I try to integrate the > formula? > > Thanks for answers >