| 2 | 1/1 | 返回列表 |
| 查看: 585 | 回復(fù): 1 | ||
cheerfulchen鐵桿木蟲 (小有名氣)
|
[求助]
用lsqnonlin擬合 NRTL三元 方程回歸參數(shù) 出現(xiàn)錯誤 求解脫
|
|
function NRTLBT a0=[1 1 1 1 1 1 1 1 1 ]; x=Lsqnonlin(@csjs,a0) function z=csjs x1 =[0.0022 0.0358 0.0134 0.0097 0.0073 0.0035]; x2 =[0.0224 0.339 0.1227 0.0857 0.0721 0.032]; x3=1-x1-x2; y1e = [0.0098 0.0379 0.0329 0.037 0.0316 0.0168]; y2e = [0.0098 0.0379 0.0329 0.037 0.0316 0.0168]; y3e=1-y1e-y2e; p =[2561 3112 3454 3600 3600 3710]; ps1 = [2530.011324 3731.190276 3731.190276 3731.190276 3731.190276 3731.190276]; ps2 = [38.27422323 91.99677979 91.99677979 91.99677979 91.99677979 91.99677979]; ps3 = [19.78428868 47.08467815 47.08467815 47.08467815 47.08467815 47.08467815]; T=[333 353 353 353 353 353]; R=8.314; for i = 1:6 %G12=exp(-a(1)*a(4)/R/T(i));tao12=a(4)/R/T(i);%a12=a(1),a13=a(2),a23=a(3),g12-g22=a(4),g13-g33=a(5),g23-g33=a(6) %G13=exp(-a(2)*a(5)/R/T(i));tao13=a(5)/R/T(i); %G23=exp(-a(3)*a(6)/R/T(i));tao23=a(6)/R/T(i); a=zero[]; tao12=a(1)/R/T(i);tao21=a(2)/R/T(i); tao13=a(3)/R/T(i);tao31=a(4)/R/T(i); tao23=a(5)/R/T(i);tao32=a(6)/R/T(i); G12=exp(-a(7)*a(1)/R/T(i));G21=exp(-a(7)*a(2)/R/T(i)); G13=exp(-a(8)*a(3)/R/T(i));G31=exp(-a(8)*a(4)/R/T(i)); G23=exp(-a(9)*a(5)/R/T(i));G32=exp(-a(9)*a(6)/R/T(i)); y1c(i) = x1(i)*ps1(i)/p(i)*exp((G21*x2(i)+G31*x3(i))*(tao21*G21*x2(i)+tao31*G31*x3(i))/(x1(i)+x2(i)*G21+x3(i)*G31)^2)... +(tao12*G12*x2(i)^2+G12*G32*x2(i)*x3(i)*(tao12-tao32))/(x1(i)*G12+x2(i)+x3(i)*G32)^2+(tao13*G13*x3(i)^2+G13*G23*x2(i)*x3(i)*(tao13-tao23))/(x1(i)*G13+x2(i)*G23+x3(i))^2; y2c(i) = x2(i)*ps2(i)/p(i)*exp((G12*x1(i)+G32*x3(i))*(tao12*G12*x1(i)+tao32*G32*x3(i))/(x1(i)*G12+x2(i)+x3(i)*G32)^2)... +(tao23*G23*x3(i)^2+G13*G23*x1(i)*x3(i)*(tao23-tao13))/(x1(i)*G13+x2(i)*G23+x3(i))^2+(tao21*G21*x1(i)^2+G21*G31*x1(i)*x3(i)*(tao21-tao31))/(x1(i)+x2(i)*G21+x3(i)*G31)^2; y3c(i) = x3(i)*ps3(i)/p(i)*exp((G13*x1(i)+G23*x2(i))*(tao13*G13*x1(i)+tao23*G23*x2(i))/(x1(i)*G13+x2(i)*G23+x3(i))^2)... +(tao21*G31*x1(i)^2+G21*G31*x1(i)*x2(i)*(tao31-tao21))/(x1(i)+x2(i)*G21+x3(i)*G31)^2+(tao32*G32*x2(i)^2+G12*G32*x1(i)*x2(i)*(tao32-tao12))/(x1(i)*G12+x3(i)*G32+x2(i))^2; z(i)=(y1e(i)-y1c(i))^2 + (y2e(i) - y2c(i))^2+(y3e(i) - y3c(i))^2; end %Matlab函數(shù):lsqnonlin('NRTL',x0) [ Last edited by cheerfulchen on 2012-4-6 at 09:43 ] |
金蟲 (小有名氣)
| 2 | 1/1 | 返回列表 |
| 最具人氣熱帖推薦 [查看全部] | 作者 | 回/看 | 最后發(fā)表 | |
|---|---|---|---|---|
|
[考研] 材料與化工272求調(diào)劑 +4 | 阿斯蒂芬2004 2026-03-28 | 4/200 |
|
|---|---|---|---|---|
|
[考研] 085701環(huán)境工程求調(diào)劑 +9 | 多久上課 2026-03-27 | 9/450 |
|
|
[考研] 295材料工程專碩求調(diào)劑 +6 | 1428151015 2026-03-27 | 6/300 |
|
|
[考研] 調(diào)劑 +3 | 李嘉圖·S·路 2026-03-27 | 3/150 |
|
|
[考研] 0703化學(xué)求調(diào)劑 +3 | 丹青奶蓋 2026-03-26 | 5/250 |
|
|
[考研]
材料調(diào)劑
5+4
|
想要一壺桃花水 2026-03-25 | 10/500 |
|
|
[考研] 中國科學(xué)院深圳先進技術(shù)研究院-光纖傳感課題組招生-中國科學(xué)院大學(xué)、深圳理工大學(xué)聯(lián)培 +5 | YangTyu1 2026-03-26 | 5/250 |
|
|
[考研]
|
WWW西西弗斯 2026-03-24 | 8/400 |
|
|
[考研] 334分 一志愿武理 材料求調(diào)劑 +4 | 李李不服輸 2026-03-26 | 4/200 |
|
|
[考研] 299求調(diào)劑 +4 | 15188958825 2026-03-25 | 4/200 |
|
|
[考研] 求調(diào)劑 +3 | QiMing7 2026-03-25 | 3/150 |
|
|
[考研] 285求調(diào)劑 +3 | AZMK 2026-03-24 | 3/150 |
|
|
[考研] 293求調(diào)劑 +7 | 加一一九 2026-03-24 | 7/350 |
|
|
[考研] 材料專碩找調(diào)劑 +5 | 哈哈哈吼吼吼哈 2026-03-23 | 5/250 |
|
|
[考研] 080500求調(diào)劑 +3 | zzzzfan 2026-03-24 | 3/150 |
|
|
[基金申請] 請教下大家 2026年國家基金申請是雙盲審嗎? +3 | lishucheng1 2026-03-22 | 5/250 |
|
|
[考研] 335求調(diào)劑 +4 | yuyu宇 2026-03-23 | 5/250 |
|
|
[考研] 333求調(diào)劑 +3 | ALULU4408 2026-03-23 | 3/150 |
|
|
[論文投稿] 急發(fā)核心期刊論文 +3 | 賢達問津 2026-03-23 | 5/250 |
|
|
[考研] 生物學(xué)調(diào)劑 +5 | Surekei 2026-03-21 | 5/250 |
|