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

forcal

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

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

2. !using("sys","string");7 Z1 H9 Z+ a) y' I! ^7 D\\" S
   
4. mvar:
   
5. 5 E\\" b4 }' A) ]5 `
6. t0=clock();
   
7. 4 x& E/ W  d' `
8. main(:pf,a,i,s)=
   
9. . r' E/ \7 V) i+ I) a+ N
10.   oo{pf=fcfor()},         //申请保存Forcal表达式句柄的FcData数据指针
    
11. . C5 Y! U) r! x6 Z
12.   s=0, i=0,  n3 W) Y2 q* L/ m/ w3 d
    
14.   while{++i<=10000,  q8 D( G* l8 O9 ?) F! d$ U
    
16.     oo{comfors(pf,ws("f(x,y)=")+ws("x+y"),2,100,0,0)},    //将Forcal动态字符串编译为全局的实数表达式/ Z' o$ ]  }8 U) ^
    
18.     a=HFor("f"),          //获得函数f的句柄
    
19. 1 E, j& l/ @+ ]$ ?% Q. p6 X' K
20.     s=s+a[1,0]            //动态调用函数f/ k& ]6 J! y+ D3 V/ z\\" J
    
22.   },
    
23. # }8 C, s% W. B) j& H* I: d
24.   s;* D$ T3 N, W2 S( P- y2 t, X
    
26. [clock()-t0]/1000;

!using("sys","string");<font class=\\"jammer\\">7 Z1 H9 Z+ a) y' I! ^7 D\\" S</font><br /> mvar:<br /> <span style=\\"display:none\\">5 E\\" b4 }' A) ]5 `</span> t0=clock();<br /> <span style=\\"display:none\\">4 x& E/ W  d' `</span> main(:pf,a,i,s)=<br /> <span style=\\"display:none\\">. r' E/ \7 V) i+ I) a+ N</span>   oo{pf=fcfor()},         //申请保存Forcal表达式句柄的FcData数据指针<br /> <span style=\\"display:none\\">. C5 Y! U) r! x6 Z</span>   s=0, i=0,<font class=\\"jammer\\">  n3 W) Y2 q* L/ m/ w3 d</font><br />   while{++i<=10000,<font class=\\"jammer\\">  q8 D( G* l8 O9 ?) F! d$ U</font><br />     oo{comfors(pf,ws("f(x,y)=")+ws("x+y"),2,100,0,0)},    //将Forcal动态字符串编译为全局的实数表达式<font class=\\"jammer\\">/ Z' o$ ]  }8 U) ^</font><br />     a=HFor("f"),          //获得函数f的句柄<br /> <span style=\\"display:none\\">1 E, j& l/ @+ ]$ ?% Q. p6 X' K</span>     s=s+a[1,0]            //动态调用函数f<font class=\\"jammer\\">/ k& ]6 J! y+ D3 V/ z\\" J</font><br />   },<br /> <span style=\\"display:none\\"># }8 C, s% W. B) j& H* I: d</span>   s;<font class=\\"jammer\\">* D$ T3 N, W2 S( P- y2 t, X</font><br /> [clock()-t0]/1000;

结果：
10000.
  t$ v7 B3 X2 h4 y1 F+ g; t- s/ V0.359  秒
( x. x' ^6 {1 f2 Y) @% a& ?
& W2 l9 }, {; i8 k$ pmatlab完成类似的功能参考：http://forum.simwe.com/archiver/tid-983780.html

  X$ }$ W- Q" z4 F7 d! S由于matlab的函数必须存为磁盘文件才能使用（这应该是一个很大的缺点），故动态编译运行的效率必然很低。

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