feixiaolin

專家經驗: +518
應助: 942 (博后)
貴賓: 1.275
金幣: 3430
散金: 58785
紅花: 532
沙發(fā): 11
帖子: 24215
在線: 2601.8小時
蟲號: 2139575
注冊: 2012-11-21
專業(yè): 光學信息獲取與處理
管轄: 數學

引用回帖:

20樓: Originally posted by xizi19880211 at 2014-01-01 15:52:52
不好意思，剛才有些地方有問題，這樣要改哪里？
Constant Pw=;
Pl=;
Parameter x(1),x(2);
MinFunction y=0.288*x(1)+0.000735*x(2);
StartProgram;
var i: Integer;
Eb(0)=0.0012*x(1);
Ec(0)= ...

我晚些時間答復你。

贊一下

回復此樓

21樓2014-01-01 16:29:20

已閱回復此樓關注TA 給TA發(fā)消息送TA紅花 TA的回帖

xizi19880211

新蟲 (初入文壇)

應助: 0 (幼兒園)
金幣: 83.5
散金: 5
帖子: 42
在線: 17.6小時
蟲號: 2752848
注冊: 2013-10-25
專業(yè): 電路與系統

引用回帖:

21樓: Originally posted by feixiaolin at 2014-01-01 16:29:20
我晚些時間答復你。...

好的，太感謝。

回復此樓

22樓2014-01-01 16:34:01

已閱回復此樓關注TA 給TA發(fā)消息送TA紅花 TA的回帖

dingd

鐵桿木蟲 (職業(yè)作家)

計算強帖: 4
應助: 1641 (講師)
金幣: 15037.3
散金: 101
紅花: 234
帖子: 3410
在線: 1223.7小時
蟲號: 291104
注冊: 2006-10-28

【答案】應助回帖

感覺樓主的模型有問題：

for i=1:49
if dp=Pw(i)*0.95-Pl(i)>0;
Elsp(i)=0;
else
Elsp(i)=[Pl(i)-Pw(i)]*0.95*i;
end
LPSP++=Elsp(i)/Pl(i);
end;

可以計算出LPSP為一定值：181.028476609036，而約束條件有：LPSP<=0.05，？？

贊一下

回復此樓

» 本帖已獲得的紅花（最新10朵）

xizi19880211

23樓2014-01-01 22:20:46

已閱回復此樓關注TA 給TA發(fā)消息送TA紅花 TA的回帖

feixiaolin

榮譽版主 (文壇精英)

專家經驗: +518
應助: 942 (博后)
貴賓: 1.275
金幣: 3430
散金: 58785
紅花: 532
沙發(fā): 11
帖子: 24215
在線: 2601.8小時
蟲號: 2139575
注冊: 2012-11-21
專業(yè): 光學信息獲取與處理
管轄: 數學

你這個很難求極小值；換言之，可能沒有極小值。
我完全用C程序跑了一下，沒出極小值。

贊一下

回復此樓

» 本帖已獲得的紅花（最新10朵）

xizi19880211

24樓2014-01-01 22:32:29

已閱回復此樓關注TA 給TA發(fā)消息送TA紅花 TA的回帖

xizi19880211

新蟲 (初入文壇)

應助: 0 (幼兒園)
金幣: 83.5
散金: 5
帖子: 42
在線: 17.6小時
蟲號: 2752848
注冊: 2013-10-25
專業(yè): 電路與系統

引用回帖:

23樓: Originally posted by dingd at 2014-01-01 22:20:46
感覺樓主的模型有問題：

for i=1:49
if dp=Pw(i)*0.95-Pl(i)>0;
Elsp(i)=0;
else
Elsp(i)=*0.95*i;
end
LPSP++=Elsp(i)/Pl(i);
end;

可以計算出LPSP為一定值：181 ...

不好意思，我知道了，LPSP++=Elsp(i)/Pl(i)*i，忘了乘以i

贊一下

回復此樓

25樓2014-01-01 22:34:24

已閱回復此樓關注TA 給TA發(fā)消息送TA紅花 TA的回帖

xizi19880211

新蟲 (初入文壇)

應助: 0 (幼兒園)
金幣: 83.5
散金: 5
帖子: 42
在線: 17.6小時
蟲號: 2752848
注冊: 2013-10-25
專業(yè): 電路與系統

引用回帖:

24樓: Originally posted by feixiaolin at 2014-01-01 22:32:29
你這個很難求極小值；換言之，可能沒有極小值。
我完全用C程序跑了一下，沒出極小值。

不好意思，里面有個地方有點問題，等會我補上所有的。

贊一下

回復此樓

26樓2014-01-01 22:36:07

已閱回復此樓關注TA 給TA發(fā)消息送TA紅花 TA的回帖

xizi19880211

新蟲 (初入文壇)

應助: 0 (幼兒園)
金幣: 83.5
散金: 5
帖子: 42
在線: 17.6小時
蟲號: 2752848
注冊: 2013-10-25
專業(yè): 電路與系統

送紅花一朵

引用回帖:

24樓: Originally posted by feixiaolin at 2014-01-01 22:32:29
你這個很難求極小值；換言之，可能沒有極小值。
我完全用C程序跑了一下，沒出極小值。

里面LPSP++=Elsp(i)/Pl(i)*i;剛才忘了乘i，再加幾個約束條件,所有的約束條件我重新寫了
LPSP<=0.05;
Pb(i)<=0.00012*x(1);
Pc(i)<=0.00012*x(2);
1000/1.2*Eb(i)<=x(1)<=1000/0.72*Eb(i);
100000/0.3037*Ec(i)<=x(2)<=100000/0.267*Ec(i);
x(1)<=7000/1.2*[Pb(i)+Pc(i)];
0.000384*x(1)+0.00000271*x(2)>=0.68*Pl(i)*i;
可以把C程序發(fā)給我么？謝謝

贊一下

回復此樓

27樓2014-01-01 22:55:04

已閱回復此樓關注TA 給TA發(fā)消息送TA紅花 TA的回帖

xizi19880211

新蟲 (初入文壇)

應助: 0 (幼兒園)
金幣: 83.5
散金: 5
帖子: 42
在線: 17.6小時
蟲號: 2752848
注冊: 2013-10-25
專業(yè): 電路與系統

送紅花一朵

引用回帖:

LPSP++=Elsp(i)/Pl(i)*i
LPSP<=0.05;
Pb(i)<=0.00012*x(1);
Pc(i)<=0.00012*x(2);
1000/1.2*Eb(i)<=x(1)<=1000/0.72*Eb(i);
100000/0.3037*Ec(i)<=x(2)<=100000/0.267*Ec(i);
x(1)<=7000/1.2*[Pb(i)+Pc(i)];
0.000384*x(1)+0.00000271*x(2)>=0.68*Pl(i)*i;
這樣呢？謝謝了

贊一下

回復此樓

28樓2014-01-01 22:57:04

已閱回復此樓關注TA 給TA發(fā)消息送TA紅花 TA的回帖

feixiaolin

榮譽版主 (文壇精英)

專家經驗: +518
應助: 942 (博后)
貴賓: 1.275
金幣: 3430
散金: 58785
紅花: 532
沙發(fā): 11
帖子: 24215
在線: 2601.8小時
蟲號: 2139575
注冊: 2012-11-21
專業(yè): 光學信息獲取與處理
管轄: 數學

引用回帖:

27樓: Originally posted by xizi19880211 at 2014-01-01 22:55:04
里面LPSP++=Elsp(i)/Pl(i)*i;剛才忘了乘i，再加幾個約束條件,所有的約束條件我重新寫了
LPSP<=0.05;
Pb(i)<=0.00012*x(1);
Pc(i)<=0.00012*x(2);
1000/1.2*Eb(i)<=x(1)<=1000/0.72*Eb(i);
100 ...

條件你自己改吧。你這5個金幣累死人。
#include<stdio.h>
#include<math.h>

void main()
{
int i, j, k;
double Eb[49], Pb[49], Ec[49], Pc[49], Elsp[49];
double LPSP, x1, x2, max, dp;
double PwP[49][2]
={
{25.33, 15},
{25.33, 15},
{25.67, 15},
{25.67, 15},
{33.33, 15},
{34.67, 15},
{38.33, 28.99},
{33, 28.99},
{28, 28.99},
{21, 28.99},
{14.67, 28.99},
{14.33, 28.99},
{4.43, 16.55},
{5.32, 16.55},
{10.33, 16.55},
{9.88, 16.55},
{8.53, 9.59},
{4.43, 9.59},
{3.33, 9.59},
{3.33, 9.59},
{5.03, 9.59},
{8.01, 9.59},
{5,       9.59},
{9.03, 9.59},
{10.99, 9.59},
{10.53, 23.33},
{12.52, 23.33},
{20, 23.33},
{23.98, 23.33},
{30.99, 23.33},
{30, 23.33},
{28.33, 23.33},
{27.53, 23.33},
{21.56, 45.88},
{27.01, 45.88},
{30.32, 45.88},
{46.98, 45.88},
{46.07, 45.88},
{55.65, 45.88},
{51.55, 45.88},
{59.88, 45.88},
{53.66, 45.88},
{52.03, 49.55},
{47.55, 49.55},
{40, 49.55},
{53.09, 49.55},
{54.99, 30.89},
{53.22, 30.89},
{50.02, 30.89},
};

max=1.0e+16;
for(i=50; i<5000; i++)
for(j=100; j<10000; j++)
{
x1=(float)i/1;
x2=(float)j/1;

Eb[0]=0.0012*x1;
Ec[0]=0.0000030375*x2;
Pb[1]=0.0012*x1;
Pc[1]=0.0000030375*x2;

for(i=1; i<=49; i++)
{
if(PwP[0]>PwP[1])
{
Eb=Eb[i-1]+Pb*i*0.7;
Ec=Ec[i-1]+Pc*i*0.98;
}
else
{
Eb=Eb[i-1]-Pb*i*0.8;
Ec=Ec[i-1]-Pc*i*0.98;
}

Pb=Eb/i;
Pc=Ec/i;
}

for(i=1; i<=49; i++)
{
dp=PwP[0]*0.95-PwP[1];
if(dp>0)
Elsp=0;
else
Elsp=(PwP[1]-PwP[0])*0.95*i;

LPSP+=Elsp/PwP[1]*i;
}
if(LPSP>0.05)
LPSP=0.05;

for(k=0; k<49; k++)
if((Eb[k]*1000/1.2<=x1)&&(x1<=Eb[k]*1000/0.72))
if((Ec[k]*100000/0.3037<=x2)&&(x2<=Ec[k]*1000000/0.267))
if(x1<=0.7*(Pb[k]+Pc[k])*1000/1.2)
            {
if(0.288*x1+0.000735*x2<max)
max=0.288*x1+0.000735*x2;
}

}

printf("\n\Min_y=0.288*x(1)+0.000735*x(2)=%f\n", max);

}

贊一下

回復此樓

29樓2014-01-01 23:00:34

已閱回復此樓關注TA 給TA發(fā)消息送TA紅花 TA的回帖

xizi19880211

新蟲 (初入文壇)

應助: 0 (幼兒園)
金幣: 83.5
散金: 5
帖子: 42
在線: 17.6小時
蟲號: 2752848
注冊: 2013-10-25
專業(yè): 電路與系統

引用回帖:

29樓: Originally posted by feixiaolin at 2014-01-01 23:00:34
條件你自己改吧。你這5個金幣累死人。
#include<stdio.h>
#include<math.h>

void main()
{
int i, j, k;
double Eb, Pb, Ec, Pc, Elsp;
double LPSP, x1, x2, max, dp;
double PwP
={ ...

謝謝了，實在是對不住了，要不我再給你幾個金幣，是不是送紅花那個就是給金幣？

贊一下

回復此樓

30樓2014-01-01 23:09:33

已閱回復此樓關注TA 給TA發(fā)消息送TA紅花 TA的回帖

最具人氣熱帖推薦 [查看全部]	作者	回/看	最后發(fā)表

[考研] 301求調劑 +10	yy要上岸呀 2026-03-17	10/500	2026-03-21 03:14 by JourneyLucky
[考研] 280求調劑 +7	咕嚕曉曉 2026-03-18	8/400	2026-03-21 01:27 by JourneyLucky
[考研] 350求調劑 +5	weudhdk 2026-03-19	5/250	2026-03-20 22:04 by luoyongfeng
[考研] 材料學碩297已過四六級求調劑推薦 +11	adaie 2026-03-19	11/550	2026-03-20 21:30 by laoshidan
[考研] 0817 化學工程 299分求調劑有科研經歷有二區(qū)文章 +22	rare12345 2026-03-18	22/1100	2026-03-20 20:39 by zhukairuo
[考研] 一志愿南京航空航天大學大學，080500材料科學與工程學碩 +5	@taotao 2026-03-20	5/250	2026-03-20 20:16 by JourneyLucky
[考研] 353求調劑 +3	拉鉤不許變 2026-03-20	3/150	2026-03-20 19:56 by JourneyLucky
[考研] 復試調劑 +4	z1z2z3879 2026-03-14	6/300	2026-03-19 17:18 by fei626-918
[考研] 0703化學調劑 +5	pupcoco 2026-03-17	8/400	2026-03-19 13:58 by houyaoxu
[考研] 0817調劑 +3	沒有答案_ 2026-03-14	3/150	2026-03-19 09:51 by Xu de nuo
[考研] 344求調劑 +6	knight344 2026-03-16	7/350	2026-03-18 20:13 by walc
[考研] 材料專碩306英一數二 +10	z1z2z3879 2026-03-16	13/650	2026-03-18 14:20 by 007_lilei
[考研] 一志愿蘇州大學材料工程（085601）專碩有科研經歷三項國獎兩個實用型專利一項省級立項 +6	大火山小火山 2026-03-16	8/400	2026-03-17 15:05 by 無懈可擊111
[考研] 275求調劑 +4	太陽花天天開心 2026-03-16	4/200	2026-03-17 10:53 by 功夫瘋狂
[考研] 一志愿，福州大學材料專碩339分求調劑 +3	木子momo青爭 2026-03-15	3/150	2026-03-17 07:52 by laoshidan
[考研] 機械專碩325，尋找調劑院校 +3	y9999 2026-03-15	5/250	2026-03-16 19:58 by y9999
[考研] 304求調劑 +5	素年祭語 2026-03-15	5/250	2026-03-16 17:00 by 我的船我的海
[考研] 0856專碩279求調劑 +5	加油加油！? 2026-03-15	5/250	2026-03-15 11:58 by 2020015
[考研] 070305求調劑 +3	mlpqaz03 2026-03-14	4/200	2026-03-15 11:04 by peike
[考研] 289求調劑 +4	這么名字咋樣 2026-03-14	6/300	2026-03-14 18:58 by userper