| Author |
Comment/Response |
Peter Pein
|
 09/24/06 10:09pm
Hi,
the sine is closely related to the exponential function. So I tried Method->DoubleExponential - and it worked:
In[1]:=
NIntegrate[Sin[Sin[x]], {x, 0, 1}, WorkingPrecision -> 400, PrecisionGoal -> 310,
Method -> DoubleExponential]
Out[1]=
0.4306061031206906049123773552484657864336080418219974695046333507508921936360747925020003322128634\
955479685128867694443852603923509289548494588345118543943267884735832534367807373138700793281214290\
921220054250570447065141981620613167726465822652527722516282057254321569438909569079887454193555057\
319454355432980554986502012325791341033587733140629386369102970220617404969117076375701547961543646\
72851711083913019103`398.4264257552079
HTH,
Peter
URL: , |
|
