24小时热门版块排行榜    

查看: 1408  |  回复: 0

arc2360

金虫 (小有名气)

[求助] 求助检查一个简单SAS编程(将两条曲线放一个图形中)

求大师帮忙看下面程序,前面是两条非线性曲线的拟合,后面想把两条曲线放一个图中,但程序运行后没有显示,求助求助,谢谢!!
Data L1; input t y @@; cards;                                                                                                                      0 3.804 24 3.877 48 3.930 72 5.01 96 5.959 120 5.813 144 6.55 168 7.094 192 7.587 216 6.8 240 6.82 264 7.084 288 7.065                                                        
;
Proc nlin method=Marquardt;                                                                  
Parms Y0=3 to 4 by 0.05  Ymax=6.5 to 7.5 by 0.1  u=0.01 to 0.05 by 0.005  M=100 to 150 by 5;                                            
Temp=exp(-u*(t-M));                                                               
model y=Y0+(Ymax-Y0) * exp(-exp(-u * (t-M)));            
der.Y0=1-exp(-temp);                                                                                       
der.Ymax=exp(-temp);                                                                                         
der.u=(Ymax-Y0) * exp(-temp) * (t-M) * temp;                           
der.M=(Ymax-Y0) * exp(-temp) * u * (-temp);                           
output out=expout p=py1;                                                              
run;   
Data L1; input t y @@; cards;                                                                                                                      0 3.804 24 3.877 48 3.930 72 5.01 96 5.959 120 5.813 144 6.55 168 7.094 192 7.587 216 6.8 240 6.82 264 7.084 288 7.065                                    
;                                                                                                                                                                                                                             
Proc nlin method= Marquardt;                                            
Parms Y0=3 to 4 by 0.05  Ymax=6.5 to 7.5 by 0.1  u=0.01 to 0.05 by 0.005  M=55 to 85 by 5;                     
Temp=exp(-u*(t-M));                                             
model y=Y0+(Ymax-Y0)/(1+exp(-u * (t-M)));                        
der.Y0=1-1/(1+temp);                              
der.Ymax=1/(1+temp);                    
der.u=(Ymax-Y0) * temp * (t-M)/((1+temp)*(1+temp));         
der.M=-(Ymax-Y0) * u * temp/((1+temp)*(1+temp));   
output out=expout p=py2;      
run;            
goptions reset=global gunit=pct cback=white border     
htitle=6 htext=3  ftext=swissb colors=(back);                                               
proc gplot data=expout;                                                                    
plot y*t py1*t  py2*t /haxis=axis1 vaxis=axis2  overlay;                  
symbol1 i=none v=plus cv=red h=2.5 w=2;                       
symbol2 i=join v=none l=1 h=2.5 w=2;                                    
axis1 order=0 to 300 by 20;                                                                     
axis2 order=3 to 8 by 0.5;                                                              
title1 'y=Y0+(Ymax-Y0)*exp(-exp(-u*(t-M)))' ;                       
title2 ' y=Y0+(Ymax-Y0)/(1+exp(-u * (t-M)))' ;                                                      
title3 'proc nlin method= Levenberg-Marquardt ';                             
run;

[ Last edited by arc2360 on 2012-3-21 at 21:51 ]
回复此楼

» 猜你喜欢

已阅   关注TA 给TA发消息 送TA红花 TA的回帖

智能机器人

Robot (super robot)

我们都爱小木虫

相关版块跳转 我要订阅楼主 arc2360 的主题更新
最具人气热帖推荐 [查看全部] 作者 回/看 最后发表
[基金申请] 听说今天filecode变了 +19 布布和一二 2026-08-06 34/1700 2026-08-07 03:13 by 虫友是什么虫
[论文投稿] 售SCI文章,我:8O.5.5.1O.54,科目全,可十急 +3 ANUsWpSnuWQD 2026-08-06 3/150 2026-08-07 02:06 by nSM3ys5fefM3
[基金申请] 基金中了 +6 laoda193707 2026-08-06 6/300 2026-08-06 23:34 by dragonxp
[基金申请] filecode +10 等待解的谜 2026-08-06 14/700 2026-08-06 21:16 by zhanghaozhu
[基金申请] 固定端突然变了,今天 +3 archvillain 2026-08-06 7/350 2026-08-06 21:05 by archvillain
[基金申请] filecode +8 布布和一二 2026-08-06 11/550 2026-08-06 20:41 by tangpu318
[基金申请] 大家散了吧,后缀研究没有意义,别浪费时间了,过好目前的每一天,不要焦虑 +5 Tide man 2026-08-06 6/300 2026-08-06 20:19 by 苏知砚
[有机交流] 一个有机合成实验室都需要哪些设备? 50+3 kf2781974 2026-07-31 12/600 2026-08-06 15:11 by eddyin
[教师之家] 咨询面上基金 +4 李长云 2026-07-31 7/350 2026-08-06 11:20 by 李长云
[基金申请] 影响面上的因素 +8 布布和一二 2026-08-05 11/550 2026-08-06 10:41 by 宝贝虫子
[基金申请] 8月时间戳变的,举个手。玩一下,释放压力 +9 archvillain 2026-08-04 11/550 2026-08-05 20:06 by wlwhappy
[基金申请] 面上再次挂了,太难了,躺也躺不了,倦也卷不过,小学校之殇! +22 低垂的野花 2026-07-31 30/1500 2026-08-05 18:03 by 低垂的野花
[基金申请] 好消息?这个有何含义??? +8 Tide man 2026-08-05 10/500 2026-08-05 16:14 by xmuxiaoyu
[考博] 【2027博士申请】纳米药物递送方向 20+3 13586093586 2026-08-03 4/200 2026-08-05 09:59 by lfy8008
[基金申请] 有没有H口的?有收到消息的吗? +3 超级海虾 2026-08-04 3/150 2026-08-04 17:26 by 学教育滴
[论文投稿] 十年后又回来了,论文投稿求助 +3 哈哈114477 2026-08-01 3/150 2026-08-04 15:40 by tegsgjy20
[基金申请] 纯娱乐,不喜欢勿喷 +7 Tide man 2026-08-04 10/500 2026-08-04 15:10 by loufangrui
[基金申请] 面上提前没消息,有中的吗 +14 archvillain 2026-08-02 18/900 2026-08-04 14:42 by archvillain
[基金申请] 娱乐 +4 Tide man 2026-08-03 4/200 2026-08-04 11:51 by wgch518
[基金申请] 什么时候能放榜呀? +3 Jacob678 2026-08-03 3/150 2026-08-03 16:14 by gltch
信息提示
请填处理意见