24小时热门版块排行榜    

查看: 1147  |  回复: 5
当前只显示满足指定条件的回帖,点击这里查看本话题的所有回帖

zhangleiii

新虫 (初入文坛)

[求助] matlab出错 求助高手解答

function fun=weifen11
global r x ;
A ,B, C ,D, F (r) ,G(r) ,H(r) 赋值
x=zeros(2,1);
x0=[1 100];
tspan=[0 1];
fun=@(t,x)[I*(x(2)+M)*jifen1-J*x(2)*jifen2-0.1*x(2)
    -K*x(1)*jifen3-0.01*x(1)];

      function  a=jifen1
       a=Roberg(f1,0,1.25*10^-6)
        function  y1= f1
            y1=F.*2.*pi.*r.*A.*(D.*H.*x(1,1)+C.*G.*x(2,1))/(1+C.*G.*x(2,1)+B.*F.*x(2,1)+D.*H.*x(1,1));  %n2
        end
    end

    function  b=jifen2
          b=Roberg(f2,0,1.25*10^-6)
        function  y2=f2
            y2=G.*2.*pi.*r.*A.*(1+B.*F.*x(2))/(1+C.*G.*x(2)+B.*F.*x(2)+D.*H.*x(1));
        end
    end

    function  c=jifen3
          c=Roberg(f3,0,1.25*10^-6)
        function y3=f3
            y3=H*2*pi.*r.*A.*(1+B.*F.*x(2))/(1+C.*G.*x(2)+B.*F.*x(2)+D.*H.*x(1));  %n1      
        end
    end

options=odeset('reltol',1e-6,'abstol',1e-8);
[t,x]=ode45(fun,tspan,x0,options);
plot(t,x)
end

运行出错:
??? Subscripted assignment dimension mismatch.

Error in ==> Roberg at 12
T(1,1)=(h/2)*(subs(sym(f),findsym(sym(f)),a)+subs(sym(f),findsym(sym(f)),b));

Error in ==> weifen11>jifen1 at 22
       a=Roberg(f1,0,1.25*10^-6)

Error in ==> weifen11>@(t,x)[I*(x(2)+M)*jifen1-J*x(2)*jifen2-0.1*x(2);-K*x(1)*jifen3-0.01*x(1)] at 18
fun=@(t,x)[I*(x(2)+M)*jifen1-J*x(2)*jifen2-0.1*x(2)

Error in ==> funfun\private\odearguments at 110
f0 = feval(ode,t0,y0,args{:});   % ODE15I sets args{1} to yp0.

Error in ==> ode45 at 173
[neq, tspan, ntspan, next, t0, tfinal, tdir, y0, f0, odeArgs, odeFcn, ...

Error in ==> weifen11 at 40
[t,x]=ode45(fun,tspan,x0,options);
回复此楼

» 猜你喜欢

» 本主题相关价值贴推荐,对您同样有帮助:

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

zhangleiii

新虫 (初入文坛)

谢谢你~~上个问题解决了。我又重新调试了一下
如下:
function fun=weifen11
global r x ;
A B C D F(r) G(r)  H(r) 赋值
fun=@(t,x)[-K.*x(1).*jifen3-0.01.*x(1)
      I.*(x(2)+M).*jifen1-J.*x(2).*jifen2-0.1.*x(2)];
     function  a=jifen1
         a=Roberg(f1,0,1.25*10^-6)
          function  y1= f1
            y1=F.*2.*pi.*r.*A.*(D.*H.*x(1)+C.*G.*x(2))./(1+C.*G.*x(2)+B.*F.*x(2)+D.*H.*x(1));  %isen2
          end
    end
    function  b=jifen2
          b=Roberg(f2,0,1.25*10^-6)
         function  y2=f2
            y2=G.*2.*pi.*r.*A.*(1+B.*F.*x(2))./(1+C.*G.*x(2)+B.*F.*x(2)+D.*H.*x(1)); %isan1
         end
    end
    function  c=jifen3
          c=Roberg(f3,0,1.25*10^-6)
        function y3=f3
            y3=H.*2.*pi.*r.*A.*(1+B.*F.*x(2))./(1+C.*G.*x(2)+B.*F.*x(2)+D.*H.*x(1));  %ipn1      
        end
    end
x0=[10 10];
tspan=[0 1];
options=odeset('reltol',1e-6,'abstol',1e-8);
[t,x]=ode45(weifen11,tspan,x0,options)
plot(t,x)
end
运行出错
??? Maximum recursion limit of 500 reached. Use set(0,'RecursionLimit',N)
to change the limit.  Be aware that exceeding your available stack space can
crash MATLAB and/or your computer.

Error in ==> besschk at 50
end


我实在弄不懂了,谢谢帮忙啊~~
4楼2011-11-23 21:17:27
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
查看全部 6 个回答

zhangleiii

新虫 (初入文坛)

怎么没人回复呀~先谢谢各位了!
2楼2011-11-23 16:27:10
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

dbb627

荣誉版主 (著名写手)

【答案】应助回帖

zhangleiii(金币+1): 谢谢! 2011-11-24 18:46:58
Roberg at 12
你的Roberg积分程序有问题
这里没有你的Roberg程序,看不出来
估计下错误应该是
subs(sym(f),findsym(sym(f)),a)+subs(sym(f),findsym(sym(f)),b));
The more you learn, the more you know, the more you know, and the more you forget. The more you forget, the less you know. So why bother to learn.
3楼2011-11-23 18:06:04
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

dbb627

荣誉版主 (著名写手)

【答案】应助回帖

zhangleiii(金币+2): 谢谢你的意见啦,问题解决了~~ 2011-11-25 09:12:55
你的程序一定使用了递归调用,MATLAB限制了递归调用的次数,默认是500次

所谓递归就是自己调用自己,因为这样比较占用资源,MATLAB为了防止死循环,所以限制了递归次数

你可以使用 set(0,'RecursionLimit',1000)将递归次数修改为1000次

我觉得你的函数修改下比较好
function fun=weifen11(t,x)
global r x ;
A B C D F(r) G(r)  H(r) 赋值
       a=Roberg(f1,0,1.25*10^-6)
       b=Roberg(f2,0,1.25*10^-6)
       c=Roberg(f3,0,1.25*10^-6)
fun=[-K.*x(1).*c-0.01.*x(1)
      I.*(x(2)+M).*a-J.*x(2).*b-0.1.*x(2)];

          function  y1= f1(x)
            y1=F.*2.*pi.*r.*A.*(D.*H.*x(1)+C.*G.*x(2))./(1+C.*G.*x(2)+B.*F.*x(2)+D.*H.*x(1));  %isen2
     
         
         function  y2=f2(x)
            y2=G.*2.*pi.*r.*A.*(1+B.*F.*x(2))./(1+C.*G.*x(2)+B.*F.*x(2)+D.*H.*x(1)); %isan1
           
        function y3=f3(x)
            y3=H.*2.*pi.*r.*A.*(1+B.*F.*x(2))./(1+C.*G.*x(2)+B.*F.*x(2)+D.*H.*x(1));  %ipn1
The more you learn, the more you know, the more you know, and the more you forget. The more you forget, the less you know. So why bother to learn.
5楼2011-11-24 19:40:24
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
最具人气热帖推荐 [查看全部] 作者 回/看 最后发表
[基金申请] 听说今天filecode变了 +26 布布和一二 2026-08-06 49/2450 2026-08-11 13:18 by WH3796
[基金申请] 奇怪,两个人的filecode固定段从头到尾一模一样 +5 布布和一二 2026-08-10 6/300 2026-08-11 10:15 by 医学老男孩
[基金申请] filecode +9 documentary 2026-08-10 9/450 2026-08-11 10:08 by wk7465
[基金申请] 基金中了 +15 laoda193707 2026-08-06 15/750 2026-08-11 00:11 by jiafei2190
[基金申请] 关于代码变化问题,想知道的进来 +17 且听虎啸 2026-08-07 24/1200 2026-08-10 18:35 by zhangduo2008
[基金申请] 静等基金结果 +5 gjjjzhong 2026-08-10 16/800 2026-08-10 17:19 by Tide man
[基金申请] 国自然结果 +4 Vierhys 2026-08-10 8/400 2026-08-10 15:06 by Vierhys
[基金申请] 好奇怪的filecode +4 布布和一二 2026-08-08 5/250 2026-08-10 14:20 by 冰心玉壶晴
[基金申请] 据悉今年马上要出结果了 +7 瞬息宇宙 2026-08-10 8/400 2026-08-10 12:42 by Vivilian
[基金申请] 这样的filecode谁见过 +11 布布和一二 2026-08-08 22/1100 2026-08-10 11:10 by wmfsnow
[基金申请] 面上项目filecode邪修 +5 西山十月 2026-08-09 7/350 2026-08-10 07:32 by 仁砚薪传
[基金申请] filecode与中标关系的预测 +5 布布和一二 2026-08-07 5/250 2026-08-09 16:15 by 袁向阳007
[基金申请] 关于filecode,很负责任的告诉大家 +6 爱看书的可乐 2026-08-08 7/350 2026-08-08 22:13 by a_niu
[基金申请] 国基金的申报应该改成非等额制,评价高的钱多评价低的钱少,但是增加资助率 +7 a089 2026-08-07 7/350 2026-08-08 18:05 by gltch
[基金申请] 关于filecode +4 布布和一二 2026-08-07 7/350 2026-08-07 22:55 by zhanghaozhu
[基金申请] 化学口download_prp&fileCode的固定段好像这几天一直没变,有变的大神么? +3 Tide man 2026-08-07 4/200 2026-08-07 22:39 by Tide man
[基金申请] 固定端突然变了,今天 +6 archvillain 2026-08-06 10/500 2026-08-07 16:03 by 医学老男孩
[基金申请] filecode变化情况 +6 布布和一二 2026-08-07 22/1100 2026-08-07 14:45 by 且听虎啸
[基金申请] filecode +14 等待解的谜 2026-08-06 19/950 2026-08-07 12:20 by wlwhappy
[基金申请] 好消息?这个有何含义??? +8 Tide man 2026-08-05 10/500 2026-08-05 16:14 by xmuxiaoyu
信息提示
请填处理意见