Hi, I have a function f(x) as following:
f[x_] := (-2 Sqrt[x] (\[Pi]^2 + x) + Exp[\[Pi]^2/x] \[Pi]^(3/2) (2 \[Pi]^2 + 3 x) Erfc[\[Pi]/Sqrt[x]]) (-Sqrt[100 - x] + Exp[\[Pi]^2/(-x + 100)] \[Pi]^(3/2) Erfc[\[Pi]/Sqrt[100 - x]])/(x^(7/2) Sqrt[-x + 100])
When I plot f(x) vs x from 0 to 10, I have the following figure
Plot[f[x], {x, 0, 10}]
and when f(x) is plotted against x from 0 to 0.01, it produces the following graph
Plot[f[x], {x, 0, 0.01}]
I would like to find the integral of f(x) with respect to x from 0 to 100, but Mathematica cannot calculate the integral.
Therefore, I try to do numerical integration. However, I received the following error message.
NIntegrate[f[x], {x, 0, 100}]
I am wondering how to solve this problem. Any help is much appreciated.
Attachments: