24小时热门版块排行榜    

查看: 1168  |  回复: 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

新虫 (初入文坛)

怎么没人回复呀~先谢谢各位了!
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的回帖

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的回帖

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的回帖

工大小雷

金虫 (初入文坛)

我也出现了递归的这个问题。
然后我clear之后,就出错,修改递归之后,再clear,程序就会直接死掉,不解了。
6楼2016-01-20 10:54:21
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
相关版块跳转 我要订阅楼主 zhangleiii 的主题更新
最具人气热帖推荐 [查看全部] 作者 回/看 最后发表
[基金申请] 2026年的国家社科基金项目通讯评审的新规则与新动向、新挑战 +7 process2012 2026-08-23 10/500 2026-08-26 19:23 by hmhminy
[基金申请] 系统查不到 +10 董八千 2026-08-26 10/500 2026-08-26 16:30 by Equinoxhua
[基金申请] 基金不中,共勉 +3 eulota 2026-08-26 3/150 2026-08-26 16:17 by 路yyyy
[基金申请] 2026国自然函评费到账 +22 羊腰板 2026-08-21 25/1250 2026-08-26 15:00 by zuocuiping
[基金申请] 2026年8月25日国自然放榜前突然收到列入评审专家邮件,有关系吗? +25 木水思豆 2026-08-25 28/1400 2026-08-26 14:53 by draco1987
[基金申请] 能否退出参与的面上项目解除限项 +23 koalala 2026-08-24 26/1300 2026-08-26 14:29 by 宝贝虫子
[基金申请] 出来了 +9 trojank 2026-08-26 9/450 2026-08-26 14:25 by 宝贝虫子
[基金申请] 哪位高人中了,把查询到的截图贴出来让我看看,让我长长见识 +4 yuleib84 2026-08-26 5/250 2026-08-26 13:40 by yuleib84
[基金申请] 为什么国自然不能直接公布 +4 bjdxyxy 2026-08-26 4/200 2026-08-26 13:12 by qingmu1201
[基金申请] 系统进不去 +4 yanglien 2026-08-26 5/250 2026-08-26 11:10 by wenfengw83
[基金申请] 项目信息和经费信息在系统里都可以看到了 +6 wittyboy 2026-08-26 14/700 2026-08-26 10:55 by wittyboy
[基金申请] 怎么看青基中了没有啊 +4 叶九微 2026-08-26 4/200 2026-08-26 10:52 by xiacongxu
[基金申请] 今天务委会开完了,明天出结果吗 +19 angus9576 2026-08-25 23/1150 2026-08-26 10:03 by zp519
[基金申请] 国合现在查不到了吗? +10 chengyan1220 2026-08-24 20/1000 2026-08-26 08:57 by peasantsprig
[基金申请] 牛来!米来!面来! +8 beefly 2026-08-26 8/400 2026-08-26 08:37 by xuzhipiao
[基金申请] 明天应该可查了!? +6 chengyan1220 2026-08-23 6/300 2026-08-25 19:45 by zfd97
[基金申请] 如果此刻你正在为国基感到焦虑,不妨来听听这首《基金之外》 +8 scalable 2026-08-24 8/400 2026-08-25 12:52 by jnhyjjm
[基金申请] 没有任何消息-是不是就凉了 +9 图啦图啦 2026-08-24 10/500 2026-08-25 11:59 by 南海小哥
[基金申请] 人气不行了 +11 fansofjerry 2026-08-21 11/550 2026-08-25 11:04 by 孤独的英雄6
[基金申请] 时间戳今天,20号变了 +5 archvillain 2026-08-20 5/250 2026-08-22 06:12 by hui_daxiao
信息提示
请填处理意见