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

forcal

程序动态生成一些函数，然后调用这些函数，体现了脚本的优势。
" o- N  ~' Y" @' q( M# L5 _, n: x
以下Forcal程序动态编译了函数 f(x,y)=x+y ，然后执行该函数，共进行了10000次。

2. !using("sys","string");
   
3. : Z, e5 I; Y0 w$ R& w1 [
4. mvar:
   
5. % d, C  j  x0 L, E
6. t0=clock();
   
7. \\" O# g! y: E6 ?
8. main(:pf,a,i,s)=
   
9. & C4 \, N* S9 k/ F/ r8 S# H0 [
10.   oo{pf=fcfor()},         //申请保存Forcal表达式句柄的FcData数据指针
    
11. ( N9 D/ M4 g0 \, p  g2 x5 K3 ?0 K
12.   s=0, i=0,
    
13. 4 S! s. e$ v2 _
14.   while{++i<=10000,
    
15. 5 i7 D+ ~6 @7 @. f$ Y! p- ?* {
16.     oo{comfors(pf,ws("f(x,y)=")+ws("x+y"),2,100,0,0)},    //将Forcal动态字符串编译为全局的实数表达式4 x9 A7 ?( t6 o4 Q! b6 U
    
18.     a=HFor("f"),          //获得函数f的句柄
    
19. \\" O# y) n$ n% d
20.     s=s+a[1,0]            //动态调用函数f' |( S0 f3 |9 w
    
22.   },
    
23. * K& |% X+ [! t. ~! x4 r
24.   s;
    
25. 0 q' o# S! ^& y# X
26. [clock()-t0]/1000;

!using("sys","string");<br /> <span style=\\"display:none\\">: Z, e5 I; Y0 w$ R& w1 [</span> mvar:<br /> <span style=\\"display:none\\">% d, C  j  x0 L, E</span> t0=clock();<br /> <span style=\\"display:none\\">\\" O# g! y: E6 ?</span> main(:pf,a,i,s)=<br /> <span style=\\"display:none\\">& C4 \, N* S9 k/ F/ r8 S# H0 [</span>   oo{pf=fcfor()},         //申请保存Forcal表达式句柄的FcData数据指针<br /> <span style=\\"display:none\\">( N9 D/ M4 g0 \, p  g2 x5 K3 ?0 K</span>   s=0, i=0,<br /> <span style=\\"display:none\\">4 S! s. e$ v2 _</span>   while{++i<=10000,<br /> <span style=\\"display:none\\">5 i7 D+ ~6 @7 @. f$ Y! p- ?* {</span>     oo{comfors(pf,ws("f(x,y)=")+ws("x+y"),2,100,0,0)},    //将Forcal动态字符串编译为全局的实数表达式<font class=\\"jammer\\">4 x9 A7 ?( t6 o4 Q! b6 U</font><br />     a=HFor("f"),          //获得函数f的句柄<br /> <span style=\\"display:none\\">\\" O# y) n$ n% d</span>     s=s+a[1,0]            //动态调用函数f<font class=\\"jammer\\">' |( S0 f3 |9 w</font><br />   },<br /> <span style=\\"display:none\\">* K& |% X+ [! t. ~! x4 r</span>   s;<br /> <span style=\\"display:none\\">0 q' o# S! ^& y# X</span> [clock()-t0]/1000;

结果：
10000.
& ^. |# v, Y8 ~; `0.359  秒
$ b  j+ _0 H& d7 ^2 J/ M! Y  z
matlab完成类似的功能参考：http://forum.simwe.com/archiver/tid-983780.html

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

! m( B- |# G1 `2 Q+ {, k程序动态生成函数的一个应用是：数据拟合中，常常要为数据寻找一个最佳的拟合公式，此时可按一定的规则生成一些函数，然后检查这些函数哪个最佳的。