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

forcal

程序动态生成一些函数，然后调用这些函数，体现了脚本的优势。
, a4 k. T% x% Q- q- A6 E
以下Forcal程序动态编译了函数 f(x,y)=x+y ，然后执行该函数，共进行了10000次。

2. !using("sys","string");. ?4 o3 A! d6 }# `6 }$ \
   
4. mvar:+ J0 s& H! J5 r, l- q8 ~+ C% w
   
6. t0=clock();+ K/ ^8 q1 K# k* I& J$ g
   
8. main(:pf,a,i,s)=* f0 l. j% p  A
   
10.   oo{pf=fcfor()},         //申请保存Forcal表达式句柄的FcData数据指针2 s8 g7 J/ V, ^/ V( M* V
    
12.   s=0, i=0,
    
13. \\" N# [) e' t' Y9 I1 K
14.   while{++i<=10000,
    
15. $ ^: _2 g  g8 g' z/ ?7 y7 E
16.     oo{comfors(pf,ws("f(x,y)=")+ws("x+y"),2,100,0,0)},    //将Forcal动态字符串编译为全局的实数表达式
    
17. \\" {: B, |5 E$ g. i  Q. \6 I& l, W
18.     a=HFor("f"),          //获得函数f的句柄0 a. P( X' a\\" o3 F% x
    
20.     s=s+a[1,0]            //动态调用函数f8 ~0 n' n* [% [
    
22.   },
    
23. 5 S( ]* A( k- f6 n) _6 x' Q6 O% _
24.   s;$ e0 w+ F/ O6 N1 ]* [. v\\" H6 @8 i
    
26. [clock()-t0]/1000;

!using("sys","string");<font class=\\"jammer\\">. ?4 o3 A! d6 }# `6 }$ \</font><br /> mvar:<font class=\\"jammer\\">+ J0 s& H! J5 r, l- q8 ~+ C% w</font><br /> t0=clock();<font class=\\"jammer\\">+ K/ ^8 q1 K# k* I& J$ g</font><br /> main(:pf,a,i,s)=<font class=\\"jammer\\">* f0 l. j% p  A</font><br />   oo{pf=fcfor()},         //申请保存Forcal表达式句柄的FcData数据指针<font class=\\"jammer\\">2 s8 g7 J/ V, ^/ V( M* V</font><br />   s=0, i=0,<br /> <span style=\\"display:none\\">\\" N# [) e' t' Y9 I1 K</span>   while{++i<=10000,<br /> <span style=\\"display:none\\">$ ^: _2 g  g8 g' z/ ?7 y7 E</span>     oo{comfors(pf,ws("f(x,y)=")+ws("x+y"),2,100,0,0)},    //将Forcal动态字符串编译为全局的实数表达式<br /> <span style=\\"display:none\\">\\" {: B, |5 E$ g. i  Q. \6 I& l, W</span>     a=HFor("f"),          //获得函数f的句柄<font class=\\"jammer\\">0 a. P( X' a\\" o3 F% x</font><br />     s=s+a[1,0]            //动态调用函数f<font class=\\"jammer\\">8 ~0 n' n* [% [</font><br />   },<br /> <span style=\\"display:none\\">5 S( ]* A( k- f6 n) _6 x' Q6 O% _</span>   s;<font class=\\"jammer\\">$ e0 w+ F/ O6 N1 ]* [. v\\" H6 @8 i</font><br /> [clock()-t0]/1000;

结果：
* j8 f1 H+ b" w- R+ M3 }9 o! \( H10000.
- h/ U; P) l+ |* S' D6 g4 B* ?0.359  秒

matlab完成类似的功能参考：http://forum.simwe.com/archiver/tid-983780.html
+ k$ b+ w4 O5 i1 L+ u0 X+ k* X
, {8 ?/ N" x- w. R; C- d由于matlab的函数必须存为磁盘文件才能使用（这应该是一个很大的缺点），故动态编译运行的效率必然很低。

% y: a, d/ m& k! l+ c& P8 Q" u! ?程序动态生成函数的一个应用是：数据拟合中，常常要为数据寻找一个最佳的拟合公式，此时可按一定的规则生成一些函数，然后检查这些函数哪个最佳的。