Problem in Solving Double Integral for PDF transformation
- To: mathgroup at smc.vnet.net
- Subject: [mg80893] Problem in Solving Double Integral for PDF transformation
- From: "Negede Abate" <negedea at googlemail.com>
- Date: Wed, 5 Sep 2007 02:46:50 -0400 (EDT)
Could any one kindly help me solve the following Integral using Mathematica?
I tried the Integrate command in different forms but I failed to succeed. I
really got staked.
*
f1 = 1/(3*E^((-42.13+t2)^2/18)*Sqrt[2*Pi]);
f2= (5.778367760333042*^-19*(11.12+t3)^12.13)/E^(4.4008893833458054*^-20*(
11.12+t3)^13.13);
f3 = Abs[Cot[0.017453292519943295*t2]];
f4=0.0037739313253375532/E^(0.000044744314476429635*(
449.96310600570723-55.69524532558123*t3+1.*t*Cot[0.017453292519943295*t
2])^2);
f5= (7.133612341840616*^-13*(-18.963106005707232+55.69524532558123*t3-1.*t
*Cot[0.017453292519943295*t2])^3.8)/E^(1.4861692378834617*^-13*(-
18.963106005707232+55.69524532558123*t3-1.*t*Cot[0.017453292519943295*t2])^
4.8);
Int1=f1 f2 f3 f4 //FullSimplify//InputForm
*
2.899933125405506*^-22*
E^(-0.05555555555555555*(-42.13 + t2)^2 -
4.4008893833458054*^-20*(11.12 + t3)^13.13 -
0.000044744314476429635*(449.96310600570723 -
55.69524532558123*t3 +
1.*t*Cot[0.017453292519943295*t2])^2)*
(11.12 + t3)^12.13*
Abs[Cot[0.017453292519943295*t2]]
*
Int2=f1 f2 f3 f5 //FullSimplify//InputForm
*
5.481551451404547*^-32*
E^(-0.05555555555555555*(-42.13 + t2)^2 -
4.4008893833458054*^-20*(11.12 + t3)^13.13 -
1.4861692378834617*^-13*(-18.963106005707232 +
55.69524532558123*t3 -
1.*t*Cot[0.017453292519943295*t2])^4.8)*
(11.12 + t3)^12.13*
Abs[Cot[0.017453292519943295*t2]]*
(-18.963106005707232 + 55.69524532558123*t3 -
1.*t*Cot[0.017453292519943295*t2])^3.8
*
Integrate[Int1,{t2,35,50},{t3,10,23}]
Integrate[Int2,{t2,35,50},{t3,10,23}]
Thanks a lot for your help!
Negede
*