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

forcal

程序动态生成一些函数，然后调用这些函数，体现了脚本的优势。

以下Forcal程序动态编译了函数 f(x,y)=x+y ，然后执行该函数，共进行了10000次。

2. !using("sys","string");
   
3. ' y! E; ]: |3 c2 E) G
4. mvar:
   
5. % x6 \) _6 j( L( f/ R* g9 o$ b3 s0 R
6. t0=clock();
   
7. ) U# B1 ~/ k, r% {) X: P, t
8. main(:pf,a,i,s)=
   
9. # E5 T1 ]& \  N. [
10.   oo{pf=fcfor()},         //申请保存Forcal表达式句柄的FcData数据指针
    
11. 2 [+ i' B\\" P# D5 j( @. {
12.   s=0, i=0,3 e5 B! X/ ?: y5 O
    
14.   while{++i<=10000,
    
15. 5 }+ ^. h* s& o/ a
16.     oo{comfors(pf,ws("f(x,y)=")+ws("x+y"),2,100,0,0)},    //将Forcal动态字符串编译为全局的实数表达式
    
17. . F* ~# ]. k' b4 a7 @2 j
18.     a=HFor("f"),          //获得函数f的句柄- y- d. o, l* A- ^\\" n  R2 t% P
    
20.     s=s+a[1,0]            //动态调用函数f7 }' L$ ~7 J  x+ T, Q, @9 B2 N
    
22.   },& R! |' ?, J$ K4 n
    
24.   s;) S7 @; X  w# G
    
26. [clock()-t0]/1000;

!using("sys","string");<br /> <span style=\\"display:none\\">' y! E; ]: |3 c2 E) G</span> mvar:<br /> <span style=\\"display:none\\">% x6 \) _6 j( L( f/ R* g9 o$ b3 s0 R</span> t0=clock();<br /> <span style=\\"display:none\\">) U# B1 ~/ k, r% {) X: P, t</span> main(:pf,a,i,s)=<br /> <span style=\\"display:none\\"># E5 T1 ]& \  N. [</span>   oo{pf=fcfor()},         //申请保存Forcal表达式句柄的FcData数据指针<br /> <span style=\\"display:none\\">2 [+ i' B\\" P# D5 j( @. {</span>   s=0, i=0,<font class=\\"jammer\\">3 e5 B! X/ ?: y5 O</font><br />   while{++i<=10000,<br /> <span style=\\"display:none\\">5 }+ ^. h* s& o/ a</span>     oo{comfors(pf,ws("f(x,y)=")+ws("x+y"),2,100,0,0)},    //将Forcal动态字符串编译为全局的实数表达式<br /> <span style=\\"display:none\\">. F* ~# ]. k' b4 a7 @2 j</span>     a=HFor("f"),          //获得函数f的句柄<font class=\\"jammer\\">- y- d. o, l* A- ^\\" n  R2 t% P</font><br />     s=s+a[1,0]            //动态调用函数f<font class=\\"jammer\\">7 }' L$ ~7 J  x+ T, Q, @9 B2 N</font><br />   },<font class=\\"jammer\\">& R! |' ?, J$ K4 n</font><br />   s;<font class=\\"jammer\\">) S7 @; X  w# G</font><br /> [clock()-t0]/1000;

结果：
* x! ]. Y7 T0 N; C' T9 `/ F10000.
0.359  秒
( C* K1 l6 W" Z- S4 i
matlab完成类似的功能参考：http://forum.simwe.com/archiver/tid-983780.html
- t+ O, D7 ~, \: l& E/ P# Q( J
由于matlab的函数必须存为磁盘文件才能使用（这应该是一个很大的缺点），故动态编译运行的效率必然很低。

5 P1 L. a0 v& W" `/ B! Z程序动态生成函数的一个应用是：数据拟合中，常常要为数据寻找一个最佳的拟合公式，此时可按一定的规则生成一些函数，然后检查这些函数哪个最佳的。