24小时热门版块排行榜    

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

吕京毛衣

银虫 (小有名气)

[求助] 自己编写了一段Matlab代码,运行时出现bug 已有1人参与

一段模拟化学反应的代码,运行时出现“Undefined function 'P' for input arguments of type 'double',而我只是想用P(i)作为一个数组储存分子数,请大家帮我看看,怎么修改?谢谢大家!


Xm=2000;Xa=2;Xr=0;  % [Xm]=2 mol/L
kd=0.00001;kp=1000;kt=10000000;
kd1=0.00001;kp1=1;kt1=10000; % VNa=1000
T=0;
j=0;
I=[];X=[];U=[];V=[];Pn=[];
while(T<=2400)
    Rd=kd1*Xa;
    Rp=kp1*Xm*Xr;
    Rt=0.5*kt1*Xr*Xr;
    R=Rd+Rp+Rt;
    Pd=Rd/R;Pp=Rp/R;Pt=Rt/R;
    r1=rand(1);
    t=(1/R)*log(1/r1);
    r2=rand(1);
    if r2<=Pd  %链引发(不区分单体和初级自由基)
        Xm=Xm-2;
        Xa=Xa-1;
        Xr=Xr+2;
        j=j+1;
        X=[X;j];
        R(j)=1;
        j=j+1;
        X=[X;j];
        R(j)=1;
    else
        if r2>Pd&&r2<=Pd+Pp %链增长
            Xm=Xm-1;
            b=ceil(Xr*rand(1));
            r3=X(b);
            R(r3)=R(r3)+1;
        else
            if r2>Pd+Pp&&r2<=1
                Xr=Xr-2;
                c=ceil(Xr*rand(1));
                r4=X(c);
                X(c)=[];
                d=ceil((Xr-1)*rand(1));
                r5=X(d);
                X(d)=[];
                i=R(r4)+R(r5);
               
                z=find(I==i);
                if z>=1
                    P(i)=P(i)+1;%储存分子数
                else
                    P(i)=1;%储存终止产物链长
                end
                 I=[I;i];
            end
        end
    end
   
    T=T+t;U=[U;T];%储存时间
    C=(2000-Xm)*100/2000;
    V=[V;C];%储存单体转化率
    L=length(I);S=sum(I);
    E=S/L;%平均链长
    Pn=[Pn;E];
end
  N=sum(P(i));
  f(i)=P(i)./N;%数量分布
  m(i)=i.*P(i);
  M=sum(m(i));
  w(i)=m(i)./M;%重量分布
  subplot(221);
  plot(I,f(i))
  subplot(222);
  plot(I,w(i))
  subplot(223);
  plot(U,V)    %转化率-时间曲线
  subplot(224);
  plot(U,Pn)   %平均链长-时间曲线
回复此楼

» 猜你喜欢

» 本主题相关商家推荐: (我也要在这里推广)

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

1791217170

金虫 (正式写手)

12楼2016-04-09 19:09:24
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
查看全部 12 个回答

月只蓝

主管区长 (职业作家)

P的初始值没有定义。
MATLAB、MS小问题、普通问题请发帖求助!时间精力有限,恕不接受无偿私信求助。
2楼2016-04-07 13:47:30
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

1049569501

新虫 (初入文坛)

【答案】应助回帖

感谢参与,应助指数 +1
没有定义函数或数组P,在循环前定义一下就行了。
3楼2016-04-07 18:59:41
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

吕京毛衣

银虫 (小有名气)

引用回帖:
2楼: Originally posted by 月只蓝 at 2016-04-07 13:47:30
P的初始值没有定义。

这种数组的初始值怎么定义呢?应该是空的吧

发自小木虫IOS客户端
4楼2016-04-08 08:36:12
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
最具人气热帖推荐 [查看全部] 作者 回/看 最后发表
[考研] 售SCI一区文章,我:8.O.55.1.O.54,科目齐全,可伽急 +3 ASdOkHsho7FD 2026-08-28 5/250 2026-08-29 05:13 by gy1nBQXYQJqL
[教师之家] 售SCI-T0P文章,我:8O.5.5.1.O.54,科目齐全,可+急 +3 ASdOkHsho7FD 2026-08-28 4/200 2026-08-29 04:06 by gy1nBQXYQJqL
[博后之家] 售SCI文章,我:8O.5.5.1O.54,科目全,可十急 +3 ASdOkHsho7FD 2026-08-28 3/150 2026-08-29 03:23 by gy1nBQXYQJqL
[基金申请] 投票:  有多少人是今天查系统知道结果的? +16 爱看书的可乐 2026-08-26 18/900 2026-08-29 00:28 by winsaint
[基金申请] 为什么资助数各大高校都创新高,自己申请怎么就这么难 +12 Kittylucky 2026-08-27 13/650 2026-08-29 00:04 by superceng
[基金申请] 有没有仍没收到信息的 +3 德尚中行 2026-08-27 3/150 2026-08-28 15:24 by rongshuxia
[教师之家] 导师吐槽:我怎么摊上了这么个极品研究生! +8 苏东坡二世 2026-08-23 8/400 2026-08-28 14:41 by lkforward
[基金申请] 看板上这么多中的,有点像50人群里49个人都是骗子的那种感觉…… +5 a089 2026-08-26 6/300 2026-08-27 14:05 by jonewore
[基金申请] 为什么 国际(地区)合作与交流项目 没有放榜? 10+3 majunge000 2026-08-26 11/550 2026-08-27 08:42 by 北京莱茵编辑
[基金申请] 2026年的国家社科基金项目通讯评审的新规则与新动向、新挑战 +7 process2012 2026-08-23 10/500 2026-08-26 19:23 by hmhminy
[基金申请] 范进中举一文的中心思想 +9 炎黄贵胄 2026-08-22 10/500 2026-08-26 15:40 by semaglutide
[基金申请] 出来了 +9 trojank 2026-08-26 9/450 2026-08-26 14:25 by 宝贝虫子
[基金申请] 为什么国自然不能直接公布 +4 bjdxyxy 2026-08-26 4/200 2026-08-26 13:12 by qingmu1201
[基金申请] 国际合作可查了,中了面上 (EPI+1)(金币+50) +18 Ldrop2023 2026-08-26 18/900 2026-08-26 11:15 by cmrandy
[基金申请] 国合可查了 +3 paperzjh 2026-08-26 3/150 2026-08-26 10:41 by LemmonTr
[基金申请] 今天务委会开完了,明天出结果吗 +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
[基金申请] 明天应该可查了!? +6 chengyan1220 2026-08-23 6/300 2026-08-25 19:45 by zfd97
[基金申请] 某些机构,以效率低为荣,以效率低作为存在感 +9 yuleib84 2026-08-25 10/500 2026-08-25 17:14 by alexon
[基金申请] 没有任何消息-是不是就凉了 +9 图啦图啦 2026-08-24 10/500 2026-08-25 11:59 by 南海小哥
信息提示
请填处理意见