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

forcal

程序动态生成一些函数，然后调用这些函数，体现了脚本的优势。
! w  L% v8 o, l8 b9 y4 p
以下Forcal程序动态编译了函数 f(x,y)=x+y ，然后执行该函数，共进行了10000次。

2. !using("sys","string");4 ?( B( a# z$ U( [; W\\" f$ i  q
   
4. mvar:
   
5. . j# I4 F: |  L
6. t0=clock();: K0 N; |, D, T% M8 H9 U4 ~% n
   
8. main(:pf,a,i,s)=; M* ^. ^+ V, s! g3 W) m0 v
   
10.   oo{pf=fcfor()},         //申请保存Forcal表达式句柄的FcData数据指针1 I4 D8 v' b\\" E3 h5 K  F
    
12.   s=0, i=0,8 T! I' V% }, S/ \( K9 w. w2 r0 }. [, b
    
14.   while{++i<=10000,
    
15. / n* Y) Z  ]3 K0 ~. y5 ?
16.     oo{comfors(pf,ws("f(x,y)=")+ws("x+y"),2,100,0,0)},    //将Forcal动态字符串编译为全局的实数表达式1 v8 {: N# S; x4 ^6 G) L; e4 E
    
18.     a=HFor("f"),          //获得函数f的句柄! a, j: t- H! u( y* U- e( E' h
    
20.     s=s+a[1,0]            //动态调用函数f
    
21. & A& a& u- I% ^. R0 B- E
22.   },) Z, l* b% B\\" d1 y1 h
    
24.   s;
    
25. ) o/ S0 C; H! b, [
26. [clock()-t0]/1000;

!using("sys","string");<font class=\\"jammer\\">4 ?( B( a# z$ U( [; W\\" f$ i  q</font><br /> mvar:<br /> <span style=\\"display:none\\">. j# I4 F: |  L</span> t0=clock();<font class=\\"jammer\\">: K0 N; |, D, T% M8 H9 U4 ~% n</font><br /> main(:pf,a,i,s)=<font class=\\"jammer\\">; M* ^. ^+ V, s! g3 W) m0 v</font><br />   oo{pf=fcfor()},         //申请保存Forcal表达式句柄的FcData数据指针<font class=\\"jammer\\">1 I4 D8 v' b\\" E3 h5 K  F</font><br />   s=0, i=0,<font class=\\"jammer\\">8 T! I' V% }, S/ \( K9 w. w2 r0 }. [, b</font><br />   while{++i<=10000,<br /> <span style=\\"display:none\\">/ n* Y) Z  ]3 K0 ~. y5 ?</span>     oo{comfors(pf,ws("f(x,y)=")+ws("x+y"),2,100,0,0)},    //将Forcal动态字符串编译为全局的实数表达式<font class=\\"jammer\\">1 v8 {: N# S; x4 ^6 G) L; e4 E</font><br />     a=HFor("f"),          //获得函数f的句柄<font class=\\"jammer\\">! a, j: t- H! u( y* U- e( E' h</font><br />     s=s+a[1,0]            //动态调用函数f<br /> <span style=\\"display:none\\">& A& a& u- I% ^. R0 B- E</span>   },<font class=\\"jammer\\">) Z, l* b% B\\" d1 y1 h</font><br />   s;<br /> <span style=\\"display:none\\">) o/ S0 C; H! b, [</span> [clock()-t0]/1000;

结果：
10000.
, @3 o  c8 a2 [* I  D" M& i0.359  秒

matlab完成类似的功能参考：http://forum.simwe.com/archiver/tid-983780.html

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

程序动态生成函数的一个应用是：数据拟合中，常常要为数据寻找一个最佳的拟合公式，此时可按一定的规则生成一些函数，然后检查这些函数哪个最佳的。