Groups > comp.soft-sys.math.mathematica > #16530

Re: Solving special exponential integral

Path	csiph.com!v102.xanadu-bbs.net!xanadu-bbs.net!news.glorb.com!news-out.readnews.com!transit3.readnews.com!newspump.sol.net!posts.news.twtelecom.net!nnrp3.twtelecom.net!not-for-mail
From	"Alexander Elkins" <alexander_elkins@hotmail.com>
Newsgroups	comp.soft-sys.math.mathematica
Subject	Re: Solving special exponential integral
Date	Fri, 7 Feb 2014 12:38:34 +0000 (UTC)
Sender	steve@smc.vnet.net
Approved	Steven M. Christensen <steve@smc.vnet.net>, Moderator
Message-ID	<ld2k4a$2af$1@smc.vnet.net> (permalink)
References	<lckihv$1hc$1@smc.vnet.net>
Lines	30
Organization	Time-Warner Telecom
NNTP-Posting-Date	07 Feb 2014 12:43:59 GMT
NNTP-Posting-Host	17f678a8.news.twtelecom.net
X-Trace	DXC=0l1KU_RTa7h492K3\KHl;kC_A=>8kQj6m;[h;PUXBgbdW:Sk\@?4VCfEFiONJ7[Gofb>^<N?UIbUg
X-Complaints-To	abuse@twtelecom.net
Xref	csiph.com comp.soft-sys.math.mathematica:16530

Show key headers only | View raw

Using the variable substitution a -> Sqrt[x - b]
represented here by the function g, Mathematica gives
the following result:

In[1]:= With[{f =
   Function[a, E^(-((a^2 * b * c^2)/(a^2 + b)))/(a^2 + b)^2],
  g = Function[x, Sqrt[x - b]]},
 Integrate[
  f[g[x]] D[g[x], x], {x,
   Sequence @@ InverseFunction[g] /@ {0, Infinity}}]]

Out[1]= ConditionalExpression[(
 E^(-((b c^2)/
   2)) \[Pi] (BesselI[0, (b c^2)/2] + BesselI[1, (b c^2)/2]))/(
 4 b^(3/2)), Re[c^2] < 0 && b > 0]

Perhaps this helps...

"simone8888" <stefanvuckovic1@gmail.com> wrote in message
news:lckihv$1hc$1@smc.vnet.net...
> I have tried to solve this integral:
>
> Integrate[E^(-((a^2 b c^2)/(a^2 + b)))/(a^2 + b)^2,a]
> Mathemathica is not able to solve it, I have tried the integration by
parts and it did not work, as well as some substitutions. Any idea how to
tackle this problem?
>

Back to comp.soft-sys.math.mathematica | Previous | Next — Previous in thread | Find similar

Thread

Solving special exponential integral simone8888 <stefanvuckovic1@gmail.com> - 2014-02-02 04:45 +0000
  Re: Solving special exponential integral "Alexander Elkins" <alexander_elkins@hotmail.com> - 2014-02-07 12:38 +0000

csiph-web