±±¾©Ê¯ÓÍ»¯¹¤Ñ§Ôº2026ÄêÑо¿ÉúÕÐÉú½ÓÊÕµ÷¼Á¹«¸æ
²é¿´: 1838  |  »Ø¸´: 15

xxz903

½ð³æ (СÓÐÃûÆø)

[ÇóÖú] matlabÊý¾ÝÄâºÏÇóÖú£¡£¡Ï£Íû¸ßÊÖ°ïæдһÏÂmatlabµÄ³ÌÐò ллÁË£¡£¡

×Ô±äÁ¿ m,Òò±äÁ¿y1,y2;
ÐèÒªÄâºÏµÄ²ÎÊýt12,t21,q1,q2,r1,r2,h
ÆäÖÐz=10;
x1=m/(m+h);
x2=1-x1;
o1=x1*r1/(x1*r1+x2*r2);
o2=x2*r2/(x1*r1+x2*r2);
b1=x1*q1/(x1*q1+x2*q2);
b2=x2*q2/(x1*q1+x2*q2);
l1=0.5*z*(r1-q1)-(r1-1);
l2=0.5*z*(r2-q2)-(r2-1);
ÐèÒªÄâºÏµÄ·½³Ì£º
y1=ln(o1/x1)+0.5*z*q1*ln(o1/b1)+o2*(l1-r1*l2/r2)-q1*ln(b1+b2*t21)+b2*q1*(t21/(b1+b2*t21)-t12/(b2+b1*t12))-ln(r1/r2)-05*z*q1*ln(q1*r2/(q2*r1))-(l1-r1*l2/r2)+q1*ln(t21)-q1*(1-t12);

y2=ln(o2/x2)+0.5*z*q2*ln(o2/b2)+o1*(l2-r2*l1/r1)-q2*ln(b2+b1*t12)+b1*q2*(t12/(b2+b1*t12)-t21/(b1+b2*t21))-ln(r2/r1)-05*z*q2*ln(q2*r1/(q1*r2))-(l2-r2*l1/r1)+q2*ln(t12)-q2*(1-t21);
Êý¾Ý£º
0        0        0
0.1        -0.673344553        -0.003214304
0.2        -0.783071888        -0.005447496
0.3        -0.841647189        -0.008713882
0.4        -0.869884359        -0.010990339
0.5        -0.884307686        -0.014309599
0.6        -0.889162064        -0.018687569
0.7        -0.889162064        -0.02207116
0.8        -0.88673193        -0.025484701
0.9        -0.879476759        -0.029975034
1        -0.869884359        -0.038731848
1.2        -0.850971266        -0.042636996
1.4        -0.830113036        -0.051995295
1.6        -0.807436327        -0.061533872
1.8        -0.783071888        -0.071257081
2        -0.759286983        -0.081169452
2.5        -0.701179352        -0.107972916
3        -0.650087691        -0.136153773
3.5        -0.599656837        -0.165810242
4        -0.553385238        -0.197052419
4.5        -0.512493681        -0.227286842
5        -0.47320876        -0.260553522
»Ø¸´´ËÂ¥

» ²ÂÄãϲ»¶

» ±¾Ö÷ÌâÏà¹Ø¼ÛÖµÌùÍÆ¼ö£¬¶ÔÄúͬÑùÓаïÖú:

ÒÑÔÄ   »Ø¸´´ËÂ¥   ¹Ø×¢TA ¸øTA·¢ÏûÏ¢ ËÍTAºì»¨ TAµÄ»ØÌû

csgt0

ÈÙÓþ°æÖ÷ (ÖøÃûдÊÖ)

²ÊÉ«¹Òͼ

¡¾´ð°¸¡¿Ó¦Öú»ØÌû

¡ï ¡ï ¡ï ¡ï ¡ï ¡ï ¡ï ¡ï ¡ï ¡ï
¸Ðл²ÎÓ룬ӦÖúÖ¸Êý +1
xxz903: ½ð±Ò+10, ¡ï¡ï¡ï¡ï¡ï×î¼Ñ´ð°¸ 2012-08-21 14:05:54
³ÌÐò´ó¸ÅÕâÑù£¬³õÖµµÃÄã×Ô¼ºµ÷ÁË
CODE:
function xxz
data=[
0.1        -0.673344553        -0.003214304
0.2        -0.783071888        -0.005447496
0.3        -0.841647189        -0.008713882
0.4        -0.869884359        -0.010990339
0.5        -0.884307686        -0.014309599
0.6        -0.889162064        -0.018687569
0.7        -0.889162064        -0.02207116
0.8        -0.88673193        -0.025484701
0.9        -0.879476759        -0.029975034
1        -0.869884359        -0.038731848
1.2        -0.850971266        -0.042636996
1.4        -0.830113036        -0.051995295
1.6        -0.807436327        -0.061533872
1.8        -0.783071888        -0.071257081
2        -0.759286983        -0.081169452
2.5        -0.701179352        -0.107972916
3        -0.650087691        -0.136153773
3.5        -0.599656837        -0.165810242
4        -0.553385238        -0.197052419
4.5        -0.512493681        -0.227286842
5        -0.47320876        -0.260553522];
xdata=data(:,1);  %Im
ydata=data(:,2:3);  %
x0=ones(1,7);    %t12,t21,q1,q2,r1,r2,h

options= optimset('MaxFunEvals',5000,'Maxiter',1000);
%lb=[10,20,0,0];
%ub=[10000,10000,100,1000];
lb=[];
ub=[];
[x,resnorm]=lsqcurvefit(@myfun,x0,xdata,ydata,lb,ub,options)
y=myfun(x,xdata);
plot(xdata,ydata,'g',xdata,y,'r')
end

function F=myfun(x,xdata)  %x=[]
t12=x(1);
t21=x(2);
q1=x(3);
q2=x(4);
r1=x(5);
r2=x(6);
h=x(7);
m=xdata;
z=10;
x1=m./(m+h);
x2=1-x1;
o1=x1*r1./(x1*r1+x2*r2);
o2=x2*r2./(x1*r1+x2*r2);
b1=x1*q1./(x1*q1+x2*q2);
b2=x2*q2./(x1*q1+x2*q2);
l1=0.5*z*(r1-q1)-(r1-1);
l2=0.5*z*(r2-q2)-(r2-1);
y1=log(o1./x1)+0.5*z*q1*log(o1./b1)+o2*(l1-r1*l2/r2)-q1*log(b1+b2*t21)...
     +b2*q1.*(t21./(b1+b2*t21)-t12./(b2+b1*t12))-log(r1/r2)...
     -05*z*q1*log(q1*r2/(q2*r1))-(l1-r1*l2/r2)+q1*log(t21)-q1*(1-t12);
y2=log(o2./x2)+0.5*z*q2*log(o2./b2)+o1*(l2-r2*l1/r1)-q2*log(b2+b1*t12)...
     +b1*q2.*(t12./(b2+b1*t12)-t21./(b1+b2*t21))-log(r2/r1)...
     -05*z*q2*log(q2*r1/(q1*r2))-(l2-r2*l1/r1)+q2*log(t12)-q2*(1-t21);
F=[y1,y2];
end

showmethemoney
2Â¥2012-08-21 11:39:11
ÒÑÔÄ   »Ø¸´´ËÂ¥   ¹Ø×¢TA ¸øTA·¢ÏûÏ¢ ËÍTAºì»¨ TAµÄ»ØÌû

xxz903

½ð³æ (СÓÐÃûÆø)

ÒýÓûØÌû:
2Â¥: Originally posted by csgt0 at 2012-08-21 11:39:11
³ÌÐò´ó¸ÅÕâÑù£¬³õÖµµÃÄã×Ô¼ºµ÷ÁË

function xxz
data=;
xdata=data(:,1);  %Im
ydata=data(:,2:3);  %
x0=ones(1,7);    %t12,t21,q1,q2,r1,r2,h

options= optimset('MaxFunEvals',5000,'Maxiter',1000) ...

Å£°¡£¡ÖÕÓÚÄÜËãÁ˰¡  ÎÒÊÔÊÔ°¡~ÓÐÎÊÌâÔÙÁªÏµÄã°¡  Ð»Ð»ÁË
3Â¥2012-08-21 14:05:43
ÒÑÔÄ   »Ø¸´´ËÂ¥   ¹Ø×¢TA ¸øTA·¢ÏûÏ¢ ËÍTAºì»¨ TAµÄ»ØÌû

xxz903

½ð³æ (СÓÐÃûÆø)

ÒýÓûØÌû:
2Â¥: Originally posted by csgt0 at 2012-08-21 11:39:11
³ÌÐò´ó¸ÅÕâÑù£¬³õÖµµÃÄã×Ô¼ºµ÷ÁË

function xxz
data=;
xdata=data(:,1);  %Im
ydata=data(:,2:3);  %
x0=ones(1,7);    %t12,t21,q1,q2,r1,r2,h

options= optimset('MaxFunEvals',5000,'Maxiter',1000) ...

Èç¹ûÎÒÏëÈÃÕ⼸¸ö²ÎÊýËæ»úÔÚ-10µ½10È¡100´Î³õֵȻºó½øÐмÆË㣬ȻºóÔÚ½á¹ûÖÐÕÒµ½×îÓŽâÔÙ½øÐл­Í¼  ÎÒ¸ÄÔõôÐÞ¸ÄÕâ¸ö³ÌÐò£¿£¿Ð»Ð»ÄãÁË
4Â¥2012-08-21 14:30:14
ÒÑÔÄ   »Ø¸´´ËÂ¥   ¹Ø×¢TA ¸øTA·¢ÏûÏ¢ ËÍTAºì»¨ TAµÄ»ØÌû

csgt0

ÈÙÓþ°æÖ÷ (ÖøÃûдÊÖ)

²ÊÉ«¹Òͼ

ÒýÓûØÌû:
4Â¥: Originally posted by xxz903 at 2012-08-21 14:30:14
Èç¹ûÎÒÏëÈÃÕ⼸¸ö²ÎÊýËæ»úÔÚ-10µ½10È¡100´Î³õֵȻºó½øÐмÆË㣬ȻºóÔÚ½á¹ûÖÐÕÒµ½×îÓŽâÔÙ½øÐл­Í¼  ÎÒ¸ÄÔõôÐÞ¸ÄÕâ¸ö³ÌÐò£¿£¿Ð»Ð»ÄãÁË...

Á½ÖÖ·½·¨
1¡¢Äã¿ÉÒÔʹÓÃmatlabÀïµÄglobalsearch»òÕßmultistartÀ´½øÐУ¬µ«ÊÇÐèÒªÏȹ¹½¨ÎÊÌâ½á¹¹£¬Äã¿ÉÒÔ¿´°ïÖúÀïµÄÀý×Ó¡£
2¡¢µÚ2ÖÖ·½·¨Äã¿ÉÒÔ×ö100´ÎÑ­»·£¬Ã¿´ÎËãÍêºó±£ÁôxºÍ²Ð²î£¬×îºóÈ¡²Ð²î½ÏСµÄÖµ¡£
Èç¹ûÄãµÄ²ÎÊýÓз¶Î§£¬¿ÉÒÔÔÚlbÀïÉèÖÃÏÂÏÞ£¬ÔÚubÀïÉèÖÃÉÏÏÞ
showmethemoney
5Â¥2012-08-21 15:30:13
ÒÑÔÄ   »Ø¸´´ËÂ¥   ¹Ø×¢TA ¸øTA·¢ÏûÏ¢ ËÍTAºì»¨ TAµÄ»ØÌû

xxz903

½ð³æ (СÓÐÃûÆø)

ÒýÓûØÌû:
5Â¥: Originally posted by csgt0 at 2012-08-21 15:30:13
Á½ÖÖ·½·¨
1¡¢Äã¿ÉÒÔʹÓÃmatlabÀïµÄglobalsearch»òÕßmultistartÀ´½øÐУ¬µ«ÊÇÐèÒªÏȹ¹½¨ÎÊÌâ½á¹¹£¬Äã¿ÉÒÔ¿´°ïÖúÀïµÄÀý×Ó¡£
2¡¢µÚ2ÖÖ·½·¨Äã¿ÉÒÔ×ö100´ÎÑ­»·£¬Ã¿´ÎËãÍêºó±£ÁôxºÍ²Ð²î£¬×îºóÈ¡²Ð²î½ÏСµÄÖµ¡£
Èç¹ûÄãµÄ ...

àÅ  ÎÒÏëÓõڶþÖÖ·½·¨£¡ ÄãÄܰïÎÒÔٸղŵĻù´¡ÉÏÐÞ¸ÄÒ»ÏÂÄǸö³ÌÐòÂð£¿ÎÒ×Ô¼º×öµÄÓеãÎÊÌâ  ÎÞ·¨ÕÒµ½×îÓŽⲢÇÒ»­³öͼÏñ°¡~~ÔٴθÐлÄãÁ˰¡~~ллÁË
6Â¥2012-08-21 16:08:29
ÒÑÔÄ   »Ø¸´´ËÂ¥   ¹Ø×¢TA ¸øTA·¢ÏûÏ¢ ËÍTAºì»¨ TAµÄ»ØÌû

xxz903

½ð³æ (СÓÐÃûÆø)

ÒýÓûØÌû:
5Â¥: Originally posted by csgt0 at 2012-08-21 15:30:13
Á½ÖÖ·½·¨
1¡¢Äã¿ÉÒÔʹÓÃmatlabÀïµÄglobalsearch»òÕßmultistartÀ´½øÐУ¬µ«ÊÇÐèÒªÏȹ¹½¨ÎÊÌâ½á¹¹£¬Äã¿ÉÒÔ¿´°ïÖúÀïµÄÀý×Ó¡£
2¡¢µÚ2ÖÖ·½·¨Äã¿ÉÒÔ×ö100´ÎÑ­»·£¬Ã¿´ÎËãÍêºó±£ÁôxºÍ²Ð²î£¬×îºóÈ¡²Ð²î½ÏСµÄÖµ¡£
Èç¹ûÄãµÄ ...

°æÖ÷~~ÔÙ°ïÎÒ¸Äһϰɠ ÎÒ¸ÄÁ˺þÃÁËҲû»­³ö×îÓŽâµÄͼÐÎ~~¸ÐлÄãÁ˰¡
7Â¥2012-08-21 16:34:50
ÒÑÔÄ   »Ø¸´´ËÂ¥   ¹Ø×¢TA ¸øTA·¢ÏûÏ¢ ËÍTAºì»¨ TAµÄ»ØÌû

csgt0

ÈÙÓþ°æÖ÷ (ÖøÃûдÊÖ)

²ÊÉ«¹Òͼ

Öм伸¾ä¸Ä³ÉÕâÑù¿ÉÒÔÊÔÊÔ¡£
ûÓиøÄãÔÚ-10µ½10ÉÏËæ»ú£¬Ö»ÔÚ0-1ÉÏËæ»ú³õÖµÁË¡£Ã¿¸ö³õÖµ¶¼Òª±£Ö¤ÄãµÄlnÀïÃæµÄºãÕý£¬²»È»¾Í´íÁË¡£½â¾öÕâ¸öÎÊÌâµÃת»¯ÎªÆäËûµÄº¯ÊýÓò»µÈÊ½Ô¼ÊøµÄ·½·¨£¬Äǽ«Ê®·ÖÂé·³¡£
CODE:
xdata=data(:,1);  %Im
ydata=data(:,2:3);  %
options= optimset('MaxFunEvals',5000,'Maxiter',1000);
lb=-ones(1,7);
ub=ones(1,7);
t=1;
for i=1:1:101
x0=rand(1,7);    %t12,t21,q1,q2,r1,r2,h
[x(t,:),resnorm(t)]=lsqcurvefit(@myfun,x0,xdata,ydata,lb,ub,options);
t=t+1;
end
m=find(resnorm==min(resnorm));
xm=x(m,:)
y=myfun(xm,xdata);
plot(xdata,ydata,'g',xdata,y,'r')

showmethemoney
8Â¥2012-08-21 17:34:26
ÒÑÔÄ   »Ø¸´´ËÂ¥   ¹Ø×¢TA ¸øTA·¢ÏûÏ¢ ËÍTAºì»¨ TAµÄ»ØÌû

xxz903

½ð³æ (СÓÐÃûÆø)

ÒýÓûØÌû:
8Â¥: Originally posted by csgt0 at 2012-08-21 17:34:26
Öм伸¾ä¸Ä³ÉÕâÑù¿ÉÒÔÊÔÊÔ¡£
ûÓиøÄãÔÚ-10µ½10ÉÏËæ»ú£¬Ö»ÔÚ0-1ÉÏËæ»ú³õÖµÁË¡£Ã¿¸ö³õÖµ¶¼Òª±£Ö¤ÄãµÄlnÀïÃæµÄºãÕý£¬²»È»¾Í´íÁË¡£½â¾öÕâ¸öÎÊÌâµÃת»¯ÎªÆäËûµÄº¯ÊýÓò»µÈÊ½Ô¼ÊøµÄ·½·¨£¬Äǽ«Ê®·ÖÂé·³¡£


xdata=dat ...

°æÖ÷  ÎªÊ²Ã´Ëã³öÀ´µÄÊǸ´Êý£¿£¿ÎÒ×Ô¼ºÐ޸ĵÄËæ»úÈ¡³õÖµµÄËã³öµÄÒ²ÊÇÓи´ÊýµÄ    Õâ¸öÎÊÌâÓ¦¸ÃÔõô½â¾ö£¿
9Â¥2012-08-21 19:33:48
ÒÑÔÄ   »Ø¸´´ËÂ¥   ¹Ø×¢TA ¸øTA·¢ÏûÏ¢ ËÍTAºì»¨ TAµÄ»ØÌû

xxz903

½ð³æ (СÓÐÃûÆø)

ÒýÓûØÌû:
8Â¥: Originally posted by csgt0 at 2012-08-21 17:34:26
Öм伸¾ä¸Ä³ÉÕâÑù¿ÉÒÔÊÔÊÔ¡£
ûÓиøÄãÔÚ-10µ½10ÉÏËæ»ú£¬Ö»ÔÚ0-1ÉÏËæ»ú³õÖµÁË¡£Ã¿¸ö³õÖµ¶¼Òª±£Ö¤ÄãµÄlnÀïÃæµÄºãÕý£¬²»È»¾Í´íÁË¡£½â¾öÕâ¸öÎÊÌâµÃת»¯ÎªÆäËûµÄº¯ÊýÓò»µÈÊ½Ô¼ÊøµÄ·½·¨£¬Äǽ«Ê®·ÖÂé·³¡£


xdata=dat ...

°æÖ÷  ÎÒÏëҪʵÊýµÄ½â  ²»Òª¸´ÊýµÄ½â  ÎÒ¸ÄÔõô´¦Àí~лÁË

» ±¾ÌûÒÑ»ñµÃµÄºì»¨£¨×îÐÂ10¶ä£©

10Â¥2012-08-22 09:01:40
ÒÑÔÄ   »Ø¸´´ËÂ¥   ¹Ø×¢TA ¸øTA·¢ÏûÏ¢ ËÍTAºì»¨ TAµÄ»ØÌû
Ïà¹Ø°æ¿éÌø×ª ÎÒÒª¶©ÔÄÂ¥Ö÷ xxz903 µÄÖ÷Ìâ¸üÐÂ
×î¾ßÈËÆøÈÈÌûÍÆ¼ö [²é¿´È«²¿] ×÷Õß »Ø/¿´ ×îºó·¢±í
[¿¼ÑÐ] Ò»Ö¾Ô¸ºÓ±±¹¤Òµ´óѧ²ÄÁϹ¤³Ì£¬³õÊÔ344Çóר˶µ÷¼Á +3 15933906766 2026-04-05 3/150 2026-04-05 22:17 by dongzh2009
[¿¼ÑÐ] Ò»Ö¾Ô¸ËÕÖÝ´óѧ²ÄÁϹ¤³Ì£¨085601£©×¨Ë¶ÓпÆÑо­ÀúÈýÏî¹ú½±Á½¸öʵÓÃÐÍרÀûÒ»ÏîÊ¡¼¶Á¢Ïî +10 ´ó»ðɽС»ðɽ 2026-04-05 10/500 2026-04-05 19:58 by СÎÏţСÎÏÅ£
[¿¼ÑÐ] 070300»¯Ñ§Ñ§Ë¶311·ÖÇóµ÷¼Á +8 Áº¸»¹óÏÕÖÐÇó 2026-04-04 8/400 2026-04-05 18:01 by Öí»á·É
[¿¼ÑÐ] 304Çóµ÷¼Á£¨085602£¬¹ýËļ¶£¬Ò»Ö¾Ô¸985£© +15 »¯¹¤ÈË999 2026-04-04 15/750 2026-04-05 16:25 by ÎÒÊǵç·çÉÈr
[¿¼ÑÐ] 085410È˹¤ÖÇÄÜ ³õÊÔ316·Ö Çóµ÷¼Á +6 ²ÐÐÇ·÷Êï 2026-03-31 6/300 2026-04-05 12:15 by rainbow11
[¿¼ÑÐ] 283·ÖÇóµ÷¼Á +9 ÊÔÊÔ¿´ß 2026-04-04 9/450 2026-04-05 10:27 by ¹û¶³´óÍõ
[¿¼ÑÐ] ±¾¿Æ211 ·ÖÊý293ÇëÇóµ÷¼Á +4 Á«²Ë¾ÍÊÇź°É 2026-04-01 4/200 2026-04-04 22:32 by hemengdong
[¿¼ÑÐ] 349Çóµ÷¼Á +11 zwjjjjjj 2026-03-31 11/550 2026-04-04 19:52 by À¶ÔÆË¼Óê
[¿¼ÑÐ] ÔõôɾÌû×Ó°¡ +3 ·ìêØ1000 2026-04-04 3/150 2026-04-04 14:20 by ÍÁľ˶ʿÕÐÉú
[¿¼ÑÐ] 26µ÷¼Á 086003 +6 ʧ»îµÄϸ°û 2026-04-04 6/300 2026-04-04 09:50 by zhangdingwa
[¿¼ÑÐ] 0856µ÷¼Á +8 ÇúÌýóÞ 2026-03-30 8/400 2026-04-04 08:46 by tianyyysss
[¿¼ÑÐ] ¿¼Ñе÷¼Á +8 ²»°®ºÈÒûÁÏ 2026-04-03 8/400 2026-04-03 16:40 by Mistake-J
[¿¼ÑÐ] Çóµ÷¼Á +3 ÐÄÏëÊÂ³É¿É 2026-04-03 3/150 2026-04-03 11:22 by wangjy2002
[¿¼ÑÐ] ÉúÎïѧ308·ÖÇóµ÷¼Á£¨Ò»Ö¾Ô¸»ª¶«Ê¦´ó£© +6 ÏàÐűػá¹ââÍòÕ 2026-03-31 7/350 2026-04-02 23:16 by JourneyLucky
[¿¼ÑÐ] 372·Ö²ÄÁÏÓ뻯¹¤£¨085600£©Ò»Ö¾Ô¸ºþÄÏ´óѧÇóµ÷¼Á +5 À¶¼ãƬ 2026-04-02 6/300 2026-04-02 21:37 by dongzh2009
[¿¼ÑÐ] »¯Ñ§¹¤³Ìר˶324·Ö£¬Ò»Ö¾Ô¸Öйú¿óÒµ´óѧÇóµ÷¼Á +7 ¹¢¹¢1314 2026-04-01 7/350 2026-04-02 07:40 by ÉÐË®¸óÖ÷
[¿¼ÑÐ] 0855»úе³õÊÔ280Çóµ÷¼Á +3 kazenotori 2026-03-31 3/150 2026-04-01 10:08 by JourneyLucky
[¿¼ÑÐ] 301Çóµ÷¼Á +8 axibli 2026-04-01 8/400 2026-04-01 09:51 by ÎҵĴ¬Îҵĺ£
[¿¼ÑÐ] 0710ÉúÎïѧÇóµ÷¼Á£¡ +6 ÐðÊöÎÄ 2026-03-31 6/300 2026-04-01 09:39 by JourneyLucky
[¿¼ÑÐ] 274Çóµ÷¼Á +6 xiao°®Í¬Ñ§ 2026-03-30 6/300 2026-03-31 10:04 by cal0306
ÐÅÏ¢Ìáʾ
ÇëÌî´¦ÀíÒâ¼û