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

forcal

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

7 {, ?& r& k3 x( g1 r( k以下Forcal程序动态编译了函数 f(x,y)=x+y ，然后执行该函数，共进行了10000次。

2. !using("sys","string");1 B7 A7 x2 ]4 J6 H7 s) X: M6 y
   
4. mvar:4 m2 |) Y# X! C
   
6. t0=clock();
   
7. 7 H' s, h1 ^% j! l' y, h- O\\" s
8. main(:pf,a,i,s)=( _8 t3 ]0 Z' ~4 _
   
10.   oo{pf=fcfor()},         //申请保存Forcal表达式句柄的FcData数据指针! H, K7 b9 r2 |8 {
    
12.   s=0, i=0,
    
13. ' J+ h\\" V6 F' s+ w7 L. O' ?6 I
14.   while{++i<=10000,& U8 p. R4 M5 C
    
16.     oo{comfors(pf,ws("f(x,y)=")+ws("x+y"),2,100,0,0)},    //将Forcal动态字符串编译为全局的实数表达式% I( _- `& Q  y4 I/ N& f) G7 q0 l% W% p
    
18.     a=HFor("f"),          //获得函数f的句柄
    
19. # v# u2 B+ i. W\\" G$ s
20.     s=s+a[1,0]            //动态调用函数f
    
21. # R/ v- n. [, A; u# ^, {8 Z
22.   },
    
23. # Q7 X) C% z% R: m& m
24.   s;
    
25. ) v$ x  L6 Q* u$ u\\" z+ }
26. [clock()-t0]/1000;

!using("sys","string");<font class=\\"jammer\\">1 B7 A7 x2 ]4 J6 H7 s) X: M6 y</font><br /> mvar:<font class=\\"jammer\\">4 m2 |) Y# X! C</font><br /> t0=clock();<br /> <span style=\\"display:none\\">7 H' s, h1 ^% j! l' y, h- O\\" s</span> main(:pf,a,i,s)=<font class=\\"jammer\\">( _8 t3 ]0 Z' ~4 _</font><br />   oo{pf=fcfor()},         //申请保存Forcal表达式句柄的FcData数据指针<font class=\\"jammer\\">! H, K7 b9 r2 |8 {</font><br />   s=0, i=0,<br /> <span style=\\"display:none\\">' J+ h\\" V6 F' s+ w7 L. O' ?6 I</span>   while{++i<=10000,<font class=\\"jammer\\">& U8 p. R4 M5 C</font><br />     oo{comfors(pf,ws("f(x,y)=")+ws("x+y"),2,100,0,0)},    //将Forcal动态字符串编译为全局的实数表达式<font class=\\"jammer\\">% I( _- `& Q  y4 I/ N& f) G7 q0 l% W% p</font><br />     a=HFor("f"),          //获得函数f的句柄<br /> <span style=\\"display:none\\"># v# u2 B+ i. W\\" G$ s</span>     s=s+a[1,0]            //动态调用函数f<br /> <span style=\\"display:none\\"># R/ v- n. [, A; u# ^, {8 Z</span>   },<br /> <span style=\\"display:none\\"># Q7 X) C% z% R: m& m</span>   s;<br /> <span style=\\"display:none\\">) v$ x  L6 Q* u$ u\\" z+ }</span> [clock()-t0]/1000;

结果：
10000.
0.359  秒
6 r& E- u5 I* A
! ?4 S& v% u8 [" _+ E% ?3 ^matlab完成类似的功能参考：http://forum.simwe.com/archiver/tid-983780.html
- k/ x" k  @& Z" }; r* x6 i5 d
由于matlab的函数必须存为磁盘文件才能使用（这应该是一个很大的缺点），故动态编译运行的效率必然很低。
# A1 `! y( |1 R2 M, ^7 j
3 ^: X! C1 A7 e$ E程序动态生成函数的一个应用是：数据拟合中，常常要为数据寻找一个最佳的拟合公式，此时可按一定的规则生成一些函数，然后检查这些函数哪个最佳的。