刚刚接触IML，涉及到模块的嵌套，实在是摸不着头脑，也找不到可参考的资料，可能不需要模块嵌套就可以，但是我不会。我就是想求数值积分，那个fun(k)里又有一个变量i，对于不同的i值求fun(k)的数值积分，可能有好多错误，请大家指正，谢谢！<br/>proc iml;<br/>start quad(i);<br/>start fun(k);<br/>ds=cos(k*i)*exp(-(1.1**1.2)*k**1.2*cos(1.2*atan(80*k))/cos(0.6*3.1415926535)+(1.1)**1.2*(1/80)**1.2/cos(0.6*3.1415926535));<br/>return(ds);<br/>finish;<br/>a={0 .p};<br/>call quad(z,'fun',a) peak=0;<br/>finish quad;<br/>T=quad({0,0.1,0.2,0.3});<br/>print T;<br/><script type="text/javascript"></script><script src="https://pagead2.googlesyndication.com/pagead/show_ads.js" type="text/javascript"></script>

[此贴子已经被作者于2008-5-30 21:53:06编辑过]