极限测试之Matlab与Forcal动态生成函数的效率

forcal

程序动态生成一些函数，然后调用这些函数，体现了脚本的优势。
/ M* G1 {% k& _% f
以下Forcal程序动态编译了函数 f(x,y)=x+y ，然后执行该函数，共进行了10000次。

2. !using("sys","string");
   
3.   u! o\\" k! y8 H/ n; ^# }/ a
4. mvar:6 W- J5 a( k\\" Y4 n: w6 }) I
   
6. t0=clock();8 x# K# p+ U0 p; @7 q( f4 m
   
8. main(:pf,a,i,s)=
   
9. 3 a\\" a3 P  p4 C2 Q5 C4 ?\\" r
10.   oo{pf=fcfor()},         //申请保存Forcal表达式句柄的FcData数据指针
    
11. 5 ?4 W' ?! w1 G- ?, D
12.   s=0, i=0,
    
13. 0 j) e7 w* X7 c# F9 e7 a
14.   while{++i<=10000,
    
15. 2 t6 L8 v) \8 P( s$ p/ J* }! }0 J  P\\" ]
16.     oo{comfors(pf,ws("f(x,y)=")+ws("x+y"),2,100,0,0)},    //将Forcal动态字符串编译为全局的实数表达式9 A4 }5 _, K6 }. E
    
18.     a=HFor("f"),          //获得函数f的句柄# @# V% a) ~4 ]) d2 B
    
20.     s=s+a[1,0]            //动态调用函数f
    
21. ) c5 X2 |/ l5 c& R4 E. g  W) h
22.   },! \' u( B. _! j0 e% L7 B/ V
    
24.   s;
    
25. . |. b, p* v% w7 O
26. [clock()-t0]/1000;

!using("sys","string");<br /> <span style=\\"display:none\\">  u! o\\" k! y8 H/ n; ^# }/ a</span> mvar:<font class=\\"jammer\\">6 W- J5 a( k\\" Y4 n: w6 }) I</font><br /> t0=clock();<font class=\\"jammer\\">8 x# K# p+ U0 p; @7 q( f4 m</font><br /> main(:pf,a,i,s)=<br /> <span style=\\"display:none\\">3 a\\" a3 P  p4 C2 Q5 C4 ?\\" r</span>   oo{pf=fcfor()},         //申请保存Forcal表达式句柄的FcData数据指针<br /> <span style=\\"display:none\\">5 ?4 W' ?! w1 G- ?, D</span>   s=0, i=0,<br /> <span style=\\"display:none\\">0 j) e7 w* X7 c# F9 e7 a</span>   while{++i<=10000,<br /> <span style=\\"display:none\\">2 t6 L8 v) \8 P( s$ p/ J* }! }0 J  P\\" ]</span>     oo{comfors(pf,ws("f(x,y)=")+ws("x+y"),2,100,0,0)},    //将Forcal动态字符串编译为全局的实数表达式<font class=\\"jammer\\">9 A4 }5 _, K6 }. E</font><br />     a=HFor("f"),          //获得函数f的句柄<font class=\\"jammer\\"># @# V% a) ~4 ]) d2 B</font><br />     s=s+a[1,0]            //动态调用函数f<br /> <span style=\\"display:none\\">) c5 X2 |/ l5 c& R4 E. g  W) h</span>   },<font class=\\"jammer\\">! \' u( B. _! j0 e% L7 B/ V</font><br />   s;<br /> <span style=\\"display:none\\">. |. b, p* v% w7 O</span> [clock()-t0]/1000;

结果：
% G) ?1 Q7 }4 E% s. K9 f; `10000.
) W/ ]2 C- T5 n. K1 l0.359  秒
2 _  M! G# i, U1 n1 ]! c
/ H/ R- K* s- Wmatlab完成类似的功能参考：http://forum.simwe.com/archiver/tid-983780.html

由于matlab的函数必须存为磁盘文件才能使用（这应该是一个很大的缺点），故动态编译运行的效率必然很低。

' m& F8 |8 [$ R: i2 D4 m6 z程序动态生成函数的一个应用是：数据拟合中，常常要为数据寻找一个最佳的拟合公式，此时可按一定的规则生成一些函数，然后检查这些函数哪个最佳的。