Hello,(adsbygoogle = window.adsbygoogle || []).push({});

I have to solve the following integral in Mathematica but although I don't get any mistakes the value I get is <10^-700 which can't be right!!

For the following values

b=0.052868

c=0.998047

g=0.00762712

s=0.902416

I have to solve the following:

Fx = Table[NIntegrate[(Exp[-t*x^2/g]/x^3)*(Sin[x] - x*Cos[x])*(b*x*Sin[x]*Cos[s*x] - (c*Sin[x] - x*Cos[x])*Sin[s*x])/((c*Sin[x] - x*Cos[x])^2 + (b^2*x^2*Sin[x]^2)),{x, 0, Infinity}],{t, 13, 100, 1}];

Could you possibly help me???I guess the problem is the exponential part which is really huge.This problem has been bothering me for a couple of weeks now!

Thank you guys

k0st123

**Physics Forums - The Fusion of Science and Community**

The friendliest, high quality science and math community on the planet! Everyone who loves science is here!

# Difficulty in solving an integral in Mathematica

Loading...

Similar Threads - Difficulty solving integral | Date |
---|---|

Mathematica Solve Perturbation problem with mathematica | Dec 7, 2017 |

Matlab Solving equation with integration using MATLAB | Aug 4, 2017 |

Solving system of equations Mathematica | Apr 3, 2017 |

Mathematica Numerically solve recurrence relation | Mar 12, 2017 |

MATLAB quad and difficulty with vector input | Nov 22, 2010 |

**Physics Forums - The Fusion of Science and Community**