应《网络安全法》要求，自2017年10月1日起，未进行实名认证将不得使用互联网跟帖服务。为保障您的帐号能够正常使用，请尽快对帐号进行手机号验证，感谢您的理解与支持！

24小时热门版块排行榜    

小木虫论坛-学术科研互动平台 » 计算模拟区 » 仿真模拟 » MATLAB » 【求助】请大家帮我分析一下下面这个程序哪里出错了
61/1返回列表
查看: 347  |  回复: 5
只看楼主 @他人 存档 新回复提醒 (忽略) 收藏    在APP中查看
当前主题已经存档。

xwz118

金虫 (正式写手)

[交流] 【求助】请大家帮我分析一下下面这个程序哪里出错了

请高手给我看看这个程序出错在哪里？如果改正，谢谢！


v=0.45:0.0001:3;
G=230000;
g=207000;
k=[66655 83318 111091];
f=0.08;
for x=1:1:length(k)
fkp(x)=(0.999*k(x)*g+0.1094*f*k(x)*g)./(0.1094*k(x)+g*v)-G*f;
end
delta_p=[8000000 15000000 0 0];
Cs=0.8e-9;
Csm=2.0e-9;
u=0.051;
n=2200;
Cv=0.2e+6;
Cvm=0.6e+6;
Cf=0.01;
Cfm=0.015;
Tc=5;
Vmax=45e-6;
nc=0.9;
rd=0.3223;
for i=1:1:length(delta_p)
for j=1:1:length(v)
    npv(i,j)=1-(1.07882*Cs)*(60*delta_p(i))/((u*n)*v(j));
    npt(i,j)=1/(1+(Cv*(u*n)/(60*delta_p(i)+Cf+(2*3.141592*Tc)/(delta_p(i)*Vmax))*(1.07882/v(j))));
    np(i,j)=npv(i,j)*npt(i,j);
    nmv(i,j)=1/(1+(Csm*delta_p(i))/(u*(v(j)/(0.377*rd*0.91))));
    nmt(i,j)=1-Cfm-(Cvm*(u*(v(j)/(0.377*rd*0.95))/delta_p(i)));
    nm(i,j)=nmv(i,j)*nmt(i,j);
    n1(i,j)=np(i,j)*nm(i,j)*nc*0.8;
end
end
[Av,H1,H2] = plotyy(v,fkp,v,n1,'plot');
set(H1,'LineStyle','--')
set(H2,'LineStyle',':')
title('潜孔钻机牵引力特性曲线')
xlabel('潜孔钻机行走速度(km/h)')
set(get(Av(1),'Ylabel'),'String','牵引力(N)')
set(get(Av(2),'Ylabel'),'String','行走系统总效率')
legend('8MPa,15MPa')
grid on
回复此楼

» 猜你喜欢
1楼 2009-04-12 10:21:43
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

woshilsh

荣誉版主 (职业作家)

优秀版主
★
xwz118(金币+1,VIP+0):谢谢 4-12 15:47
fkp(x)=(0.999*k(x)*g+0.1094*f*k(x)*g)./(0.1094*k(x)+g*v)-G*f;
你的程序这一段有问题，左边只是一个值赋给fkp(1or2or3)
右边呢由于v的缘故，就成了个向量！呵呵
修改下吧！
赞一下(1人) 回复此楼
[center][url=http://www.91cool.net/][img]http://id.91cool.net/sign/?name=小木虫印&say=各位版主辛苦了！[/img][/url][/center]
2楼2009-04-12 14:37:06
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

woshilsh

荣誉版主 (职业作家)

优秀版主
★ ★ ★ ★
kuhailangyu(金币+2,VIP+0):替楼主感谢！ 4-12 15:15
xwz118(金币+2,VIP+0):我想把这些曲线都在同个图里一起显示 4-12 15:48
正好我在弄类似的东东，帮你改了改
v=0.45:0.0001:3;
G=230000;
g=207000;
k=[66655 83318 111091];
f=0.08;
j=length(v)
for x=1:1:length(k)
    for y=1:j
        fkp(x,y)=(0.999*k(x)*g+0.1094*f*k(x)*g)./(0.1094*k(x)+g*v(j))-G*f;
    end
end
delta_p=[8000000 15000000 0 0];
Cs=0.8e-9;
Csm=2.0e-9;
u=0.051;
n=2200;
Cv=0.2e+6;
Cvm=0.6e+6;
Cf=0.01;
Cfm=0.015;
Tc=5;
Vmax=45e-6;
nc=0.9;
rd=0.3223;
for i=1:1:length(delta_p)
for j=1:1:length(v)
    npv(i,j)=1-(1.07882*Cs)*(60*delta_p(i))/((u*n)*v(j));
    npt(i,j)=1/(1+(Cv*(u*n)/(60*delta_p(i)+Cf+(2*3.141592*Tc)/(delta_p(i)*Vmax))*(1.07882/v(j))));
    np(i,j)=npv(i,j)*npt(i,j);
    nmv(i,j)=1/(1+(Csm*delta_p(i))/(u*(v(j)/(0.377*rd*0.91))));
    nmt(i,j)=1-Cfm-(Cvm*(u*(v(j)/(0.377*rd*0.95))/delta_p(i)));
    nm(i,j)=nmv(i,j)*nmt(i,j);
    n1(i,j)=np(i,j)*nm(i,j)*nc*0.8;
end
end
[Av,H1,H2] = plotyy(v,fkp(1,,v,n1,'plot');
set(H1,'LineStyle','--')
set(H2,'LineStyle',':')
title('潜孔钻机牵引力特性曲线')
xlabel('潜孔钻机行走速度(km/h)')
set(get(Av(1),'Ylabel'),'String','牵引力(N)')
set(get(Av(2),'Ylabel'),'String','行走系统总效率')
legend('8MPa,15MPa')
grid on

注意这里啊[Av,H1,H2] = plotyy(v,fkp(1,,v,n1,'plot');
fkp现在是3行x列的数组了
所以打印的时候，要分开打印，由于不知道你干什么，只好简单这样写了，你看看，有啥问题，大家再探讨！
赞一下(11人) 回复此楼
[center][url=http://www.91cool.net/][img]http://id.91cool.net/sign/?name=小木虫印&say=各位版主辛苦了！[/img][/url][/center]
3楼2009-04-12 14:41:50
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

woshilsh

荣誉版主 (职业作家)

优秀版主
kuhailangyu(金币+0,VIP+0):楼主等待您的解答！ 4-12 16:18
那就直接plotyy(v,fkp,v,n1,'plot');看看是不是你的结果
赞一下(10人) 回复此楼
[center][url=http://www.91cool.net/][img]http://id.91cool.net/sign/?name=小木虫印&say=各位版主辛苦了！[/img][/url][/center]
4楼2009-04-12 15:53:23
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

xwz118

金虫 (正式写手)
我试过，行不通
我需要这个图里有3个不同的fkp曲线
赞一下 回复此楼
5楼2009-04-12 16:02:24
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

woshilsh

荣誉版主 (职业作家)

优秀版主
★ ★
xwz118(金币+2,VIP+0):谢谢 4-13 11:45
引用回帖:
Originally posted by xwz118 at 2009-4-12 16:02:
我试过，行不通
我需要这个图里有3个不同的fkp曲线

plotyy(v,fkp,v,n1,'plot')
根据你的程序，
fkp是3行25501列的矩阵
v是4行25501列矩阵
这样的话，你画的时候按照plotyy(x,y1,x,y2,'plot')的语法，y1和y2按理应该是同一类型的值，你这里一个3行，一个4行，啥意思呢？
同时不太明白你想画什么？
感觉隔行如隔山啊！呵呵，愚钝，连你这东西都理解不了，希望有弟兄来帮忙下
赞一下 回复此楼
[center][url=http://www.91cool.net/][img]http://id.91cool.net/sign/?name=小木虫印&say=各位版主辛苦了！[/img][/url][/center]
6楼2009-04-12 20:16:07
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
相关版块跳转 我要订阅楼主 xwz118 的主题更新
61/1返回列表
普通表情 龙 兔 虎 猫 高级回复 (可上传附件)
最具人气热帖推荐 [查看全部] 作者 回/看 最后发表
[考博] 售SCI一区T0P文章，我:8O.55.1.O.54,科目全,可伽急 +3 EZ67DG6CvcKL 2026-08-31 5/250 2026-09-01 05:45 by o3EMxHUAQDtS
[考研] 售SCI文章，我:8O.5.5.1O.54,科目全,可十急 +3 EZ67DG6CvcKL 2026-08-31 5/250 2026-09-01 05:43 by o3EMxHUAQDtS
[硕博家园] 售SCI一区文章，我:8O5.5.1.O5.4,科目全,可伽急 +3 wsYGJnURYvm6 2026-08-31 3/150 2026-09-01 01:40 by o3EMxHUAQDtS
[公派出国] 售SCI文章，我:8O.5.5.1O.54,科目全,可十急 +3 EZ67DG6CvcKL 2026-08-31 4/200 2026-09-01 01:30 by o3EMxHUAQDtS
[找工作] 售SCI一区文章，我:8.O.55.1.O.54,科目齐全,可伽急 +3 EZ67DG6CvcKL 2026-08-31 3/150 2026-08-31 22:23 by o3EMxHUAQDtS
[基金申请] 投票:  有多少人是今天查系统知道结果的？ +17 爱看书的可乐 2026-08-26 19/950 2026-08-31 21:30 by xiangy672
[基金申请] 基金未中，这种答复是模板吗？ +6 zhaosm1982 2026-08-27 7/350 2026-08-31 21:18 by qdxxmc
[基金申请] 哪位高人中了，把查询到的截图贴出来让我看看，让我长长见识 +6 yuleib84 2026-08-26 7/350 2026-08-31 19:46 by 鱼翔浅底1
[基金申请] 能否申诉？ +7 echo8914667 2026-08-30 8/400 2026-08-31 17:00 by yihongxu
[文学芳草园] 梦想 +5 myrtle 2026-08-26 5/250 2026-08-31 14:40 by hahaboy
[基金申请] 29号明天会评吗 +4 笨笨唐 2026-08-28 4/200 2026-08-31 09:30 by huixian257
[基金申请] 基金不中，共勉 +12 eulota 2026-08-26 12/600 2026-08-31 08:42 by ZJTJZ
[基金申请] 麻烦专家们看看评委们的意见（F口面上） +6 gdd2018 2026-08-28 11/550 2026-08-30 08:58 by 超级无敌华子
[基金申请] 我就是申请一个面上项目而已，这评审意见是按照杰青的条件评的吧？ +6 gouxfjh 2026-08-28 11/550 2026-08-30 07:57 by gouxfjh
[基金申请] 国自然评审意见 +13 wangmingqi 2026-08-28 19/950 2026-08-29 10:22 by Poppy1104
[基金申请] 基金系统什么内容也没有 30+4 winsaint 2026-08-27 9/450 2026-08-28 11:06 by maolC
[基金申请] 2026年8月25日国自然放榜前突然收到列入评审专家邮件，有关系吗？ +25 木水思豆 2026-08-25 28/1400 2026-08-26 14:53 by draco1987
[基金申请] 牛来！米来！面来！ +8 beefly 2026-08-26 8/400 2026-08-26 08:37 by xuzhipiao
[基金申请] 在坚冰还盖着北海的时候，我看到了怒放的梅花。 (金币+10) +6 ziyangfang 2026-08-25 9/450 2026-08-25 20:26 by huagongfeihu
[基金申请] 某些机构，以效率低为荣，以效率低作为存在感 +9 yuleib84 2026-08-25 10/500 2026-08-25 17:14 by alexon
信息提示
关闭
请填处理意见
关闭