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

forcal

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

4 Y$ D9 N, Q9 I! u* i以下Forcal程序动态编译了函数 f(x,y)=x+y ，然后执行该函数，共进行了10000次。

2. !using("sys","string");
   
3. 8 W' G+ z$ D3 x  j& j+ B
4. mvar:, Z2 V: F7 l1 w2 g
   
6. t0=clock();2 f0 E' U# Z3 t3 n4 U, F$ b8 N, T
   
8. main(:pf,a,i,s)=8 K( ]: W9 i1 h# B# X5 ?4 ^3 p
   
10.   oo{pf=fcfor()},         //申请保存Forcal表达式句柄的FcData数据指针
    
11. 2 p- j4 U/ c- Z, z9 D  l
12.   s=0, i=0,
    
13. 2 v4 I- k7 y% {
14.   while{++i<=10000,
    
15. : o\\" g1 Y1 s, L1 z! p1 @4 a
16.     oo{comfors(pf,ws("f(x,y)=")+ws("x+y"),2,100,0,0)},    //将Forcal动态字符串编译为全局的实数表达式\\" E' c( T! N& Y& H) r' I# a\\" e: h5 @
    
18.     a=HFor("f"),          //获得函数f的句柄8 u- T$ B# A\\" I7 @; n/ z% [* Z
    
20.     s=s+a[1,0]            //动态调用函数f8 o8 o\\" k0 W4 S5 E' q
    
22.   },
    
23.   W. C( U( y( ?# e  N7 F
24.   s;
    
25. \\" _- r' V# p5 w; e: N
26. [clock()-t0]/1000;

!using("sys","string");<br /> <span style=\\"display:none\\">8 W' G+ z$ D3 x  j& j+ B</span> mvar:<font class=\\"jammer\\">, Z2 V: F7 l1 w2 g</font><br /> t0=clock();<font class=\\"jammer\\">2 f0 E' U# Z3 t3 n4 U, F$ b8 N, T</font><br /> main(:pf,a,i,s)=<font class=\\"jammer\\">8 K( ]: W9 i1 h# B# X5 ?4 ^3 p</font><br />   oo{pf=fcfor()},         //申请保存Forcal表达式句柄的FcData数据指针<br /> <span style=\\"display:none\\">2 p- j4 U/ c- Z, z9 D  l</span>   s=0, i=0,<br /> <span style=\\"display:none\\">2 v4 I- k7 y% {</span>   while{++i<=10000,<br /> <span style=\\"display:none\\">: o\\" g1 Y1 s, L1 z! p1 @4 a</span>     oo{comfors(pf,ws("f(x,y)=")+ws("x+y"),2,100,0,0)},    //将Forcal动态字符串编译为全局的实数表达式<font class=\\"jammer\\">\\" E' c( T! N& Y& H) r' I# a\\" e: h5 @</font><br />     a=HFor("f"),          //获得函数f的句柄<font class=\\"jammer\\">8 u- T$ B# A\\" I7 @; n/ z% [* Z</font><br />     s=s+a[1,0]            //动态调用函数f<font class=\\"jammer\\">8 o8 o\\" k0 W4 S5 E' q</font><br />   },<br /> <span style=\\"display:none\\">  W. C( U( y( ?# e  N7 F</span>   s;<br /> <span style=\\"display:none\\">\\" _- r' V# p5 w; e: N</span> [clock()-t0]/1000;

结果：
2 b: n1 e4 s  I+ `5 P4 O10000.
0.359  秒
7 L( v, l  m# G6 X, r2 l
4 |! F0 L, u* fmatlab完成类似的功能参考：http://forum.simwe.com/archiver/tid-983780.html
3 a& m. B7 P$ X9 N' t
  }5 @- b* y4 }5 u! b3 h由于matlab的函数必须存为磁盘文件才能使用（这应该是一个很大的缺点），故动态编译运行的效率必然很低。

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