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

forcal

程序动态生成一些函数，然后调用这些函数，体现了脚本的优势。
5 ?, y& |: C4 |2 |- m* M. [
以下Forcal程序动态编译了函数 f(x,y)=x+y ，然后执行该函数，共进行了10000次。

2. !using("sys","string");
   
3. 7 Z. V0 \1 h0 _6 l* l
4. mvar:4 a' U9 u( ?\\" k0 B  w. f+ d
   
6. t0=clock();, I. J8 m\\" ^$ Z. R' W2 _
   
8. main(:pf,a,i,s)=
   
9. ! A0 T, U; O3 Y* X
10.   oo{pf=fcfor()},         //申请保存Forcal表达式句柄的FcData数据指针
    
11. 4 d* E# g) a1 a8 c# U\\" I
12.   s=0, i=0,& l) a! E6 I7 q9 U4 _- x; D
    
14.   while{++i<=10000,
    
15. 2 L, R' b0 W; N) O$ Q
16.     oo{comfors(pf,ws("f(x,y)=")+ws("x+y"),2,100,0,0)},    //将Forcal动态字符串编译为全局的实数表达式. f: F2 |/ h$ U; R) r' c. K
    
18.     a=HFor("f"),          //获得函数f的句柄* [# L  O) }! ~' @# F7 W0 `
    
20.     s=s+a[1,0]            //动态调用函数f
    
21. ( z\\" Q$ ?. A4 K! B
22.   },
    
23. 9 o# m* c# Z0 }! Z# [9 A. m7 H
24.   s;/ C0 y: j- W) J- I\\" s
    
26. [clock()-t0]/1000;

!using("sys","string");<br /> <span style=\\"display:none\\">7 Z. V0 \1 h0 _6 l* l</span> mvar:<font class=\\"jammer\\">4 a' U9 u( ?\\" k0 B  w. f+ d</font><br /> t0=clock();<font class=\\"jammer\\">, I. J8 m\\" ^$ Z. R' W2 _</font><br /> main(:pf,a,i,s)=<br /> <span style=\\"display:none\\">! A0 T, U; O3 Y* X</span>   oo{pf=fcfor()},         //申请保存Forcal表达式句柄的FcData数据指针<br /> <span style=\\"display:none\\">4 d* E# g) a1 a8 c# U\\" I</span>   s=0, i=0,<font class=\\"jammer\\">& l) a! E6 I7 q9 U4 _- x; D</font><br />   while{++i<=10000,<br /> <span style=\\"display:none\\">2 L, R' b0 W; N) O$ Q</span>     oo{comfors(pf,ws("f(x,y)=")+ws("x+y"),2,100,0,0)},    //将Forcal动态字符串编译为全局的实数表达式<font class=\\"jammer\\">. f: F2 |/ h$ U; R) r' c. K</font><br />     a=HFor("f"),          //获得函数f的句柄<font class=\\"jammer\\">* [# L  O) }! ~' @# F7 W0 `</font><br />     s=s+a[1,0]            //动态调用函数f<br /> <span style=\\"display:none\\">( z\\" Q$ ?. A4 K! B</span>   },<br /> <span style=\\"display:none\\">9 o# m* c# Z0 }! Z# [9 A. m7 H</span>   s;<font class=\\"jammer\\">/ C0 y: j- W) J- I\\" s</font><br /> [clock()-t0]/1000;

结果：
10000.
) S- R" P$ N9 s9 X* b0.359  秒
4 p# J% ]' z* |0 _2 f
# [) d- Y7 I! W9 |matlab完成类似的功能参考：http://forum.simwe.com/archiver/tid-983780.html
6 D$ S6 z1 M/ u5 M3 M1 P& l
/ D4 H! `, Q" w" m! c8 @- Q由于matlab的函数必须存为磁盘文件才能使用（这应该是一个很大的缺点），故动态编译运行的效率必然很低。

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