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

forcal

程序动态生成一些函数，然后调用这些函数，体现了脚本的优势。
+ x! X9 [5 ]- ]; r+ d
以下Forcal程序动态编译了函数 f(x,y)=x+y ，然后执行该函数，共进行了10000次。

2. !using("sys","string");+ r5 z3 e8 V4 ^$ K1 f( ]% E
   
4. mvar:* ^8 R' m; r* J6 x+ n/ j
   
6. t0=clock();7 n! J4 g5 g% F4 t+ w, t$ m4 d7 U
   
8. main(:pf,a,i,s)=
   
9. 5 a  i( P2 ?* f7 F6 W6 U9 ]
10.   oo{pf=fcfor()},         //申请保存Forcal表达式句柄的FcData数据指针
    
11. 4 O2 }4 F5 o  b2 s
12.   s=0, i=0,
    
13. / h) _  M. m# a2 j\\" q# C; O\\" L# M
14.   while{++i<=10000,
    
15. 0 m  N6 G  ]* o
16.     oo{comfors(pf,ws("f(x,y)=")+ws("x+y"),2,100,0,0)},    //将Forcal动态字符串编译为全局的实数表达式& O- s/ W$ A: E# L8 N; ]
    
18.     a=HFor("f"),          //获得函数f的句柄
    
19. : Y1 ~. r& F4 \8 f& z
20.     s=s+a[1,0]            //动态调用函数f
    
21. 0 V( h0 o+ f% C$ l' \
22.   },1 z1 U3 I; V% n: w8 U- F1 @0 a; O
    
24.   s;
    
25. \\" Z: b7 Z( f\\" B4 F& j5 \. j7 v
26. [clock()-t0]/1000;

!using("sys","string");<font class=\\"jammer\\">+ r5 z3 e8 V4 ^$ K1 f( ]% E</font><br /> mvar:<font class=\\"jammer\\">* ^8 R' m; r* J6 x+ n/ j</font><br /> t0=clock();<font class=\\"jammer\\">7 n! J4 g5 g% F4 t+ w, t$ m4 d7 U</font><br /> main(:pf,a,i,s)=<br /> <span style=\\"display:none\\">5 a  i( P2 ?* f7 F6 W6 U9 ]</span>   oo{pf=fcfor()},         //申请保存Forcal表达式句柄的FcData数据指针<br /> <span style=\\"display:none\\">4 O2 }4 F5 o  b2 s</span>   s=0, i=0,<br /> <span style=\\"display:none\\">/ h) _  M. m# a2 j\\" q# C; O\\" L# M</span>   while{++i<=10000,<br /> <span style=\\"display:none\\">0 m  N6 G  ]* o</span>     oo{comfors(pf,ws("f(x,y)=")+ws("x+y"),2,100,0,0)},    //将Forcal动态字符串编译为全局的实数表达式<font class=\\"jammer\\">& O- s/ W$ A: E# L8 N; ]</font><br />     a=HFor("f"),          //获得函数f的句柄<br /> <span style=\\"display:none\\">: Y1 ~. r& F4 \8 f& z</span>     s=s+a[1,0]            //动态调用函数f<br /> <span style=\\"display:none\\">0 V( h0 o+ f% C$ l' \</span>   },<font class=\\"jammer\\">1 z1 U3 I; V% n: w8 U- F1 @0 a; O</font><br />   s;<br /> <span style=\\"display:none\\">\\" Z: b7 Z( f\\" B4 F& j5 \. j7 v</span> [clock()-t0]/1000;

结果：
# w( c% H. ?: }5 n3 r10000.
+ [" ?2 p* r) K, o9 |9 h0.359  秒
  g6 r) E" {( ?. m! J7 |6 c! y/ ?
matlab完成类似的功能参考：http://forum.simwe.com/archiver/tid-983780.html
! W4 e& N: i0 I* p
; c2 I1 ?1 `+ {* Y由于matlab的函数必须存为磁盘文件才能使用（这应该是一个很大的缺点），故动态编译运行的效率必然很低。
. @: _# v4 C  |/ f$ _/ y! l) V
程序动态生成函数的一个应用是：数据拟合中，常常要为数据寻找一个最佳的拟合公式，此时可按一定的规则生成一些函数，然后检查这些函数哪个最佳的。