最佳泄洪问题1题的求解

yueyongpeng

程序1：计算机寻找解，在0~1的范围内 求出了最高点5到6取值范围内的具体值
/ ]' w. L2 ^, m/ ]) }( D- d0 m5 J: _2 [clc
1 Q. G$ z+ C) x0 ^clear
h=[3.6 4 4.7 4.4 3.8 3.3 3.2 2.5 5 4.4 3.0 3.5 2.4 3.8 3.8];
  ?3 d! O" s8 I& g% K/ C* s/ Ps=[6.1
* B3 _  h& @& i% Q$ W8.4
7 9.3 4.8 3.6 0.9 8.5 1.8 9.1 4.6 1.5 2.3 8.8 1.3];
1 I% K; f: Z2 J5 d3 fk=[1.4 7.0 5.8 3.3 2.0 9.4 0.9 6.0 7.2 1.6 3.0 4.1 4.1 5.3 4.4];
  o  N8 \7 ~) g; V) d: s5 h$ Tj=1;
9 ^+ @# K9 H& n: }$ Hm=zeros(201,15);
0 z2 I; V7 t% _, b; d- bn=zeros(201,15);
0 A$ _$ ?5 [, d3 {- A; h2 o$ Bo=zeros(1,201);
cost=zeros(201,1);
value=zeros(201,1);
for x=0:0.005:1
) }- @# F/ `  R+ o# d5 M6 t6 }
) b- ?) g3 k. Ec=0;
5 A3 A2 t0 W% J, o
q=0;
8 F! u* A: t! t2 \1 ^
! z1 J+ F4 I2 u7 B" T7 Bfor i=1:15

  I1 X: G' m) k$ r0 K4 [p=5.0+x-h(i);

$ Z: {. L/ q7 q3 t1 ?3 m* ~m(j,i)=p

if p>=1

- S: U9 Y. G9 I6 Q* pc1=k(i);
9 ^  I1 Y: \# }. b
  z$ }! M% F! k3 t' G! B2 Xc=c1+c;
$ g) C6 o0 j2 L0 G# W3 \
, V5 B1 j' z6 k/ s5 G# \1 I2 Dn(j,i)=c1;

: a/ o: G- |) _, Lelse
2 I- B3 u4 W6 P( U' L# ?3 q, x5 K7 s% d
1 |: E* R, P' b2 O; ~' w$ w: ^c1=k(i)*p;
* q: l" X# C  S7 z
c=c1+c;

n(j,i)=c1;
* w# f- [% S9 k$ A7 o8 D# k  u
% z, h% L2 o  G; O7 u2 H/ Rend

q1=s(i)*p*1000000;

q=q1+q;
" c6 N: c! o: a* r
o(j)=q1;
; \; L. N5 ^5 F8 K
end

" O$ C: J4 l. f6 O% F- `8 ecost(j)=c;
9 ~8 }  |3 f) m# }2 H) i$ s+ u- R5 q
* K3 p. C7 m8 J+ e7 i: cvalue(j)=q;
3 C0 ^9 ]) g0 N  e" y* z% K% \3 \
; E" e* K3 A* K. I+ H& X+ X, t6 k/ Bj=j+1;
" ?/ ]; O7 d% |: h. ~, _4 y' hend
2 f$ K; V9 K- D+ px=0:0.005:1;
inval=zeros(201,1);
. }2 I' l( y+ ^3 u* \( ^for i=1:201

inval(i)=1/value(i);
end
" D* ?" ?  x5 g; t: S2 _plot(x,inval)
+ n$ H! Z& t/ e6 d# d5 `hold on
% b% ]8 g: N; m( @6 j2 ^* ~plot(x,cost)
figure()
7 o( J5 `& M, `! a5 H- C) V2 n/ Wplot(value,cost)
. ]2 T( j, v" q% jp=polyfit(value,cost,1);
poly2str(p,'value')

yueyongpeng

东方明珠-WDZYQ

O(∩_∩)O哈哈~，hoax啊

ddpbhxz

哈哈，很好啊！！！！

yueyongpeng

O(∩_∩)O哈哈~，hoax啊                     
+ z4 G% d  n$ Q4 o+ f
计算机寻找解，在0~1的范围内 求出了最高点5到6取值范围内的具体值

yueyongpeng

计算机寻找解，在0~1的范围内 求出了最高点5到6取值范围内的具体值

yueyongpeng

计算机寻找解，在0~1的范围内 求出了最高点5到6取值范围内的具体值

yueyongpeng

计算机寻找解，在0~1的范围内 求出了最高点5到6取值范围内的具体值