| 查看: 373 | 回复: 0 | ||
qq642867921银虫 (小有名气)
|
[求助]
大神帮忙看下matlab代码如何设置输出程序，非常感谢！
|
|
我的程序是fsolve的39个非线性方程，跪求大神帮忙看下，如何设置输出代码，使所有输出的结果全部都位于0~1之间，跪谢！ function f=myfun1000(N) global number; number=number+1; b1=0.6625;a1=0.378333333;b2=0.25;a2=0.149019608;b3=0.208333333;a3=0.006578947;p=1E-12;%a1=SiO2;a2=Al2O3;a3=Cr2O3;b1=CaO;b2=MgO;b3=FeO; k1=281.3950532; k2=8065.856887; k3=6410.811308; k4=30.06055264; k5=71.99830518; k6=139.8574962; k7=268.7249903; k8=1.30309E+13; k9=3.58229854; k10=67.33736511; k11=0.000903471; k12=0.000999156; k13=0.000197228; k14=7.569522933; k15=38.3802878; k16=12.59153449; k17=6.684150735; k18=4.193535028; k19=4.065756496; k20=11.26860548; k21=4.664740682; k22=348.1168847; k23=1189.415788; k24=1956.28233; k25=232.7280509; k26=28.91832018; k27=3691.794536; k28=1243.435699; k29=1.042678642; k30=1917.860835; k31=517.7897451; k32=239542.0967; k33=31930502.63; f(1)=N(1)+N(2)+N(3)+N(4)+N(5)+N(6)+N(7)+N(8)+N(9)+N(10)+N(11)+N(12)+N(13)+N(14)+N(15)+N(16)+N(17)+N(18)+N(19)+N(20)+N(21)+N(22)+N(23)+N(24)++N(25)+N(26)+N(27)+N(28)+N(29)+N(30)+N(31)+N(32)+N(33)+N(34)+N(35)+N(36)+N(37)+N(38)+N(39)-1; f(2)=a3*(N(2)+N(7)+N(8)+N(9)+N(20)+N(21)+N(24)+2*N(27)+N(33)+2*N(34)+N(35)+N(36)+2*N(37)+2*N(38)+2*N(39))-a1*(N(6)+0.5*N(15)+N(16)+0.5*N(17)+1.5*N(18)+0.5*N(19)+N(23)+N(26)); f(3)=a3*(N(4)+N(10)+2*N(11)+N(12)+6*N(13)+7*N(14)+N(22)+N(25)+3*N(27)+N(34)+N(35))-a2*(N(6)+0.5*N(15)+N(16)+0.5*N(17)+1.5*N(18)+0.5*N(19)+N(23)+N(26)); f(4)=a3*(0.5*N(1)+N(7)+2*N(8)+3*N(9)+N(10)+N(11)+3*N(12)+6*N(13)+12*N(14)+N(15)+N(16)+N(28)+2*N(29)+N(30)+N(33)+N(34)+2*N(35)+N(36)+N(37)+2*N(38)+3*N(39))-b1*(N(6)+0.5*N(15)+N(16)+0.5*N(17)+1.5*N(18)+0.5*N(19)+N(23)+N(26)); f(5)=a3*(0.5*N(3)+N(20)+2*N(21)+N(22)+N(23)+N(36)+N(37)+N(38)+N(39))-b2*(N(6)+0.5*N(15)+N(16)+0.5*N(17)+1.5*N(18)+0.5*N(19)+N(23)+N(26)); f(6)=a3*(0.5*N(5)+2*N(24)+N(25)+N(26)+2*N(28)+2*N(29)+3*N(30)+3*N(31)+2*N(32)+N(33))-b3*(N(6)+0.5*N(15)+N(16)+0.5*N(17)+1.5*N(18)+0.5*N(19)+N(23)+N(26)); f(7)=N(7)-k1*N(1)*N(2); f(8)=N(8)-k2*N(1)^2*N(2); f(9)=N(9)-k3*N(1)^3*N(2); f(10)=N(10)-k4*N(1)*N(4); f(11)=N(11)-k5*N(1)*N(4)^2; f(12)=N(12)-k6*N(1)^3*N(4); f(13)=N(13)-k7*N(1)*N(4)^6; f(14)=N(14)-k8*N(1)^12*N(4)^7; f(15)=N(15)-k9*N(1)*N(6)^0.5*p^0.75; f(16)=N(16)-k10*N(1)*N(6); f(17)=N(17)-k11*N(6)^0.5/p^0.75; f(18)=N(18)-k12*N(6)^1.5/p^0.75; f(19)=N(19)-k13*N(6)^0.5*p^0.75; f(20)=N(20)-k14*N(2)*N(3); f(21)=N(21)-k15*N(2)*N(3)^2; f(22)=N(22)-k16*N(3)*N(4); f(23)=N(23)-k17*N(3)*N(6); f(24)=N(24)-k18*N(2)*N(5)^2; f(25)=N(25)-k19*N(4)*N(5); f(26)=N(26)-k20*N(5)*N(6); f(27)=N(27)-k21*N(2)^2*N(4)^3; f(28)=N(28)-k22*N(1)*N(5)^2*p^0.75; f(29)=N(29)-k23*N(1)^2*N(5)^2*p^0.5; f(30)=N(30)-k24*N(1)*N(5)^3*p^0.5; f(31)=N(31)-k25*N(5)^3*p^0.5; f(32)=N(32)-k26*N(5)^2*p^0.5; f(33)=N(33)-k27*N(1)*N(2)*N(5); f(34)=N(34)-k28*N(1)*N(2)^2*N(4); f(35)=N(35)-k29*N(1)^2*N(2)*N(4); f(36)=N(36)-k30*N(1)*N(2)*N(3); f(37)=N(37)-k31*N(1)*N(2)^2*N(3); f(38)=N(38)-k32*N(1)^2*N(2)^2*N(3); f(39)=N(39)-k33*N(1)^3*N(2)^2*N(3); |
回复此楼» 猜你喜欢
求标准粉末衍射卡号 ICDD 01-076-1802
已经有0人回复
-
新西兰Robinson研究所招收全奖PhD
已经有0人回复
-
物理学I论文润色/翻译怎么收费?
已经有202人回复
-
石墨烯转移--二氧化硅衬底石墨烯
已经有0人回复
-
笼目材料中量子自旋液体基态的证据
已经有0人回复
-
数学教学论硕士可以读数学物理博士吗？
已经有0人回复
-
德国亥姆霍兹Hereon中心汉堡分部招镁合金腐蚀裂变SCC课题方向2026公派博士生
已经有4人回复
-
澳门大学 应用物理及材料工程研究院 潘晖教授课题组诚招博士后
已经有11人回复
-
求助NH4V4O10晶体的CIF文件
已经有0人回复
-
英国全奖博士招聘-深度学习与量子物理
已经有0人回复
