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

forcal

程序动态生成一些函数，然后调用这些函数，体现了脚本的优势。
  g1 @" o2 g+ S4 A
以下Forcal程序动态编译了函数 f(x,y)=x+y ，然后执行该函数，共进行了10000次。

2. !using("sys","string");
   
3. ( \& s; W# ]9 m  S- Z7 G
4. mvar:
   
5. . d1 x' Y1 r2 y4 n
6. t0=clock();8 |$ T- ?\\" A/ u! F
   
8. main(:pf,a,i,s)=. X. E* V- r9 q* P
   
10.   oo{pf=fcfor()},         //申请保存Forcal表达式句柄的FcData数据指针( O: W2 r4 u( U4 U4 `0 h* a7 G; {6 P
    
12.   s=0, i=0,8 O6 K2 O# V2 _
    
14.   while{++i<=10000,8 [: l\\" v0 O6 |' N- J
    
16.     oo{comfors(pf,ws("f(x,y)=")+ws("x+y"),2,100,0,0)},    //将Forcal动态字符串编译为全局的实数表达式
    
17. 0 u; Q$ U: B. h\\" d& J
18.     a=HFor("f"),          //获得函数f的句柄( ]/ k- I/ u$ y# G& w
    
20.     s=s+a[1,0]            //动态调用函数f
    
21. & F6 S* e  n8 M4 l4 ^3 w3 @0 W
22.   },% J+ L' V! }& h1 H6 C5 g! b0 S# Q
    
24.   s;\\" o8 {2 y/ l+ I- l( p6 v8 T/ l
    
26. [clock()-t0]/1000;

!using("sys","string");<br /> <span style=\\"display:none\\">( \& s; W# ]9 m  S- Z7 G</span> mvar:<br /> <span style=\\"display:none\\">. d1 x' Y1 r2 y4 n</span> t0=clock();<font class=\\"jammer\\">8 |$ T- ?\\" A/ u! F</font><br /> main(:pf,a,i,s)=<font class=\\"jammer\\">. X. E* V- r9 q* P</font><br />   oo{pf=fcfor()},         //申请保存Forcal表达式句柄的FcData数据指针<font class=\\"jammer\\">( O: W2 r4 u( U4 U4 `0 h* a7 G; {6 P</font><br />   s=0, i=0,<font class=\\"jammer\\">8 O6 K2 O# V2 _</font><br />   while{++i<=10000,<font class=\\"jammer\\">8 [: l\\" v0 O6 |' N- J</font><br />     oo{comfors(pf,ws("f(x,y)=")+ws("x+y"),2,100,0,0)},    //将Forcal动态字符串编译为全局的实数表达式<br /> <span style=\\"display:none\\">0 u; Q$ U: B. h\\" d& J</span>     a=HFor("f"),          //获得函数f的句柄<font class=\\"jammer\\">( ]/ k- I/ u$ y# G& w</font><br />     s=s+a[1,0]            //动态调用函数f<br /> <span style=\\"display:none\\">& F6 S* e  n8 M4 l4 ^3 w3 @0 W</span>   },<font class=\\"jammer\\">% J+ L' V! }& h1 H6 C5 g! b0 S# Q</font><br />   s;<font class=\\"jammer\\">\\" o8 {2 y/ l+ I- l( p6 v8 T/ l</font><br /> [clock()-t0]/1000;

结果：
$ B$ M# G! F' G10000.
; g( y' f' L* b- v0.359  秒
9 S7 H( f/ @" |) j7 X* a
2 `- y' \' Q. D" r5 o. Jmatlab完成类似的功能参考：http://forum.simwe.com/archiver/tid-983780.html
  z/ v' U4 L$ U8 ^8 J: b0 Y6 r
由于matlab的函数必须存为磁盘文件才能使用（这应该是一个很大的缺点），故动态编译运行的效率必然很低。
* {0 H) ^% U3 W* o5 w& y# c2 I. c
; j8 w1 r2 X! Q. `$ g程序动态生成函数的一个应用是：数据拟合中，常常要为数据寻找一个最佳的拟合公式，此时可按一定的规则生成一些函数，然后检查这些函数哪个最佳的。