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

forcal

程序动态生成一些函数，然后调用这些函数，体现了脚本的优势。
4 V' G, D8 n# J* d. Z& b+ B
以下Forcal程序动态编译了函数 f(x,y)=x+y ，然后执行该函数，共进行了10000次。

2. !using("sys","string");
   
3. 9 I' P& }/ |* }  L& |8 a6 `
4. mvar:
   
5. / ~\\" G1 E/ U% x( x5 |) ]( G' |# R1 s
6. t0=clock();8 c8 @5 d' p, p& l! F
   
8. main(:pf,a,i,s)=
   
9. 6 X' u\\" H\\" e\\" S. p/ x/ u% B1 F+ t4 S' B
10.   oo{pf=fcfor()},         //申请保存Forcal表达式句柄的FcData数据指针. C; \( ~! H$ D, a
    
12.   s=0, i=0,
    
13. 2 f! v6 c6 p; Y* s# }0 Z
14.   while{++i<=10000,
    
15. 4 D: u  R8 E( b, g) l% t) p
16.     oo{comfors(pf,ws("f(x,y)=")+ws("x+y"),2,100,0,0)},    //将Forcal动态字符串编译为全局的实数表达式& k5 }( u\\" w# k
    
18.     a=HFor("f"),          //获得函数f的句柄
    
19. : n; w. v! M# S\\" K& l\\" f* i( n6 Y+ f
20.     s=s+a[1,0]            //动态调用函数f: I$ K' v5 k' i+ y$ b
    
22.   },
    
23. * _2 U0 p2 O( L  p\\" B
24.   s;
    
25.   p3 z# T% E3 X5 a0 ~
26. [clock()-t0]/1000;

!using("sys","string");<br /> <span style=\\"display:none\\">9 I' P& }/ |* }  L& |8 a6 `</span> mvar:<br /> <span style=\\"display:none\\">/ ~\\" G1 E/ U% x( x5 |) ]( G' |# R1 s</span> t0=clock();<font class=\\"jammer\\">8 c8 @5 d' p, p& l! F</font><br /> main(:pf,a,i,s)=<br /> <span style=\\"display:none\\">6 X' u\\" H\\" e\\" S. p/ x/ u% B1 F+ t4 S' B</span>   oo{pf=fcfor()},         //申请保存Forcal表达式句柄的FcData数据指针<font class=\\"jammer\\">. C; \( ~! H$ D, a</font><br />   s=0, i=0,<br /> <span style=\\"display:none\\">2 f! v6 c6 p; Y* s# }0 Z</span>   while{++i<=10000,<br /> <span style=\\"display:none\\">4 D: u  R8 E( b, g) l% t) p</span>     oo{comfors(pf,ws("f(x,y)=")+ws("x+y"),2,100,0,0)},    //将Forcal动态字符串编译为全局的实数表达式<font class=\\"jammer\\">& k5 }( u\\" w# k</font><br />     a=HFor("f"),          //获得函数f的句柄<br /> <span style=\\"display:none\\">: n; w. v! M# S\\" K& l\\" f* i( n6 Y+ f</span>     s=s+a[1,0]            //动态调用函数f<font class=\\"jammer\\">: I$ K' v5 k' i+ y$ b</font><br />   },<br /> <span style=\\"display:none\\">* _2 U0 p2 O( L  p\\" B</span>   s;<br /> <span style=\\"display:none\\">  p3 z# T% E3 X5 a0 ~</span> [clock()-t0]/1000;

结果：
10000.
6 X: {) E. F7 V' y4 I0.359  秒
& x- c! ]' y3 g+ ~( j
5 H% t+ j; b. [9 T5 y/ W  Jmatlab完成类似的功能参考：http://forum.simwe.com/archiver/tid-983780.html

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

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