QQ登录

只需要一步,快速开始

 注册地址  找回密码
查看: 6847|回复: 0
打印 上一主题 下一主题

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

[复制链接]
字体大小: 正常 放大
forcal 实名认证       

45

主题

3

听众

282

积分

升级  91%

  • TA的每日心情
    难过
    2012-8-27 18:22
  • 签到天数: 1 天

    [LV.1]初来乍到

    跳转到指定楼层
    1#
    发表于 2011-8-3 07:40 |只看该作者 |正序浏览
    |招呼Ta 关注Ta
    程序动态生成一些函数,然后调用这些函数,体现了脚本的优势。7 k2 m9 A' p$ o% A
    2 [0 G, u' e3 b. U/ d
    以下Forcal程序动态编译了函数 f(x,y)=x+y ,然后执行该函数,共进行了10000次。
    1. !using("sys","string");6 Y, a3 P( A  J8 _8 X5 I
    2. mvar:. i\\" O. L  D5 d. m# r2 C
    3. t0=clock();
    4. , ^( D4 |# K/ A8 T! E, W
    5. main(:pf,a,i,s)=
    6. + R. j2 @- y; V' m! Y# E
    7.   oo{pf=fcfor()},         //申请保存Forcal表达式句柄的FcData数据指针
    8. \\" u. g5 s# O$ G. i& t
    9.   s=0, i=0,
    10. 4 R( q* E* e/ n1 o/ |, O
    11.   while{++i<=10000,
    12. ) O' _: {& v& o. @\\" Z; A1 ^
    13.     oo{comfors(pf,ws("f(x,y)=")+ws("x+y"),2,100,0,0)},    //将Forcal动态字符串编译为全局的实数表达式
    14. - ~/ v* |9 l( L; {2 `\\" S
    15.     a=HFor("f"),          //获得函数f的句柄
    16.   l! q. f! I3 R9 V5 i& {2 F
    17.     s=s+a[1,0]            //动态调用函数f
    18. & U, N! l! U: }& V: ?( n
    19.   },
    20. ' i  w2 K\\" w; u) ~9 V# ]. X5 Z. |
    21.   s;
    22. 9 j; L% A5 d% P; r+ {- i
    23. [clock()-t0]/1000;
    结果:
    ) l7 _1 A" I8 X2 R$ d10000.' m8 {% D$ E# C
    0.359  秒  c) `' ~4 ~0 X' h, a* @) M

    . [% l* b8 u: k1 o: f  j) Nmatlab完成类似的功能参考:http://forum.simwe.com/archiver/tid-983780.html) a2 ]- k) C  T% \
    # V( a# J) B" w% F/ q7 N
    由于matlab的函数必须存为磁盘文件才能使用(这应该是一个很大的缺点),故动态编译运行的效率必然很低。
    : Z* s% _- n& b0 @' X9 z$ S2 B
    3 I1 B7 z; `8 N' ?1 ^: I  r% D程序动态生成函数的一个应用是:数据拟合中,常常要为数据寻找一个最佳的拟合公式,此时可按一定的规则生成一些函数,然后检查这些函数哪个最佳的。
    zan
    转播转播0 分享淘帖0 分享分享0 收藏收藏0 支持支持0 反对反对0 微信微信
    您需要登录后才可以回帖 登录 | 注册地址

    qq
    收缩
    • 电话咨询

    • 04714969085
    fastpost

    关于我们| 联系我们| 诚征英才| 对外合作| 产品服务| QQ

    手机版|Archiver| |繁體中文 手机客户端  

    蒙公网安备 15010502000194号

    Powered by Discuz! X2.5   © 2001-2013 数学建模网-数学中国 ( 蒙ICP备14002410号-3 蒙BBS备-0002号 )     论坛法律顾问:王兆丰

    GMT+8, 2026-9-1 10:47 , Processed in 0.440647 second(s), 52 queries .

    回顶部