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

forcal

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

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

2. !using("sys","string");
   
3.   K5 k  o( u' i) t
4. mvar:! O\\" I7 T2 F& r3 l2 q; Z
   
6. t0=clock();
   
7. 4 K, d5 y- W5 _
8. main(:pf,a,i,s)=
   
9. . p. X. t( E\\" Z- P2 [
10.   oo{pf=fcfor()},         //申请保存Forcal表达式句柄的FcData数据指针
    
11. 8 U6 V, [* s# U0 h- N  l
12.   s=0, i=0,
    
13. 2 ^3 {9 y& N* s/ `
14.   while{++i<=10000,$ |4 d2 ]' \' I2 w/ @; M) O+ j
    
16.     oo{comfors(pf,ws("f(x,y)=")+ws("x+y"),2,100,0,0)},    //将Forcal动态字符串编译为全局的实数表达式
    
17. ) m6 q) C7 `6 n2 m. j5 X+ `9 }
18.     a=HFor("f"),          //获得函数f的句柄
    
19. - w7 Y) z. Q3 N# O3 X' m
20.     s=s+a[1,0]            //动态调用函数f# n$ ~: U  f) w  _- Q  r$ z
    
22.   },
    
23. 5 @- Z6 ]- @$ t( T, V9 ^
24.   s;, Z) e, {5 Z. Q3 E) T
    
26. [clock()-t0]/1000;

!using("sys","string");<br /> <span style=\\"display:none\\">  K5 k  o( u' i) t</span> mvar:<font class=\\"jammer\\">! O\\" I7 T2 F& r3 l2 q; Z</font><br /> t0=clock();<br /> <span style=\\"display:none\\">4 K, d5 y- W5 _</span> main(:pf,a,i,s)=<br /> <span style=\\"display:none\\">. p. X. t( E\\" Z- P2 [</span>   oo{pf=fcfor()},         //申请保存Forcal表达式句柄的FcData数据指针<br /> <span style=\\"display:none\\">8 U6 V, [* s# U0 h- N  l</span>   s=0, i=0,<br /> <span style=\\"display:none\\">2 ^3 {9 y& N* s/ `</span>   while{++i<=10000,<font class=\\"jammer\\">$ |4 d2 ]' \' I2 w/ @; M) O+ j</font><br />     oo{comfors(pf,ws("f(x,y)=")+ws("x+y"),2,100,0,0)},    //将Forcal动态字符串编译为全局的实数表达式<br /> <span style=\\"display:none\\">) m6 q) C7 `6 n2 m. j5 X+ `9 }</span>     a=HFor("f"),          //获得函数f的句柄<br /> <span style=\\"display:none\\">- w7 Y) z. Q3 N# O3 X' m</span>     s=s+a[1,0]            //动态调用函数f<font class=\\"jammer\\"># n$ ~: U  f) w  _- Q  r$ z</font><br />   },<br /> <span style=\\"display:none\\">5 @- Z6 ]- @$ t( T, V9 ^</span>   s;<font class=\\"jammer\\">, Z) e, {5 Z. Q3 E) T</font><br /> [clock()-t0]/1000;

结果：
10000.
0 \6 w+ q* ~( p, p% R0.359  秒

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

由于matlab的函数必须存为磁盘文件才能使用（这应该是一个很大的缺点），故动态编译运行的效率必然很低。
8 y1 c( Q. D+ W' p8 ]
程序动态生成函数的一个应用是：数据拟合中，常常要为数据寻找一个最佳的拟合公式，此时可按一定的规则生成一些函数，然后检查这些函数哪个最佳的。