谁能真正解决这个问题，送20个矩阵币

lxsoft110

我编这段程序的目的是为了模拟火灾中，一个房间里面的人员的撤离情况，运行出来，蓝色的点是障碍物、黑色是可以空地、绿色代表人。
0 ^$ l, B3 k" n- E我用的算法是：1.建立一个60*60的网格，并且定义边界和出口
2 G1 U! g& d9 g5 U  `6 U% }. f1 E                    2.给每个格子赋一个状态。（0，0，0）代表空地。（0，1，0）代表人，（0，0，1）代表障碍物。
% x  W) V$ y% W- w9 \- {" }. L                     3.规定每隔一段时间，计算人的状态（看前后左右，哪个格子离门口近，而且无障碍物），就向那个格子移动。
) B, u  U8 s- M" ]: J/ V% O+ y                      4。看所有人离开房间需要多少时间。
; s) ]. v! S. A+ B4 K7 x, ?5 q下面附上MATLAB程序：盼大牛解答！！不胜感激！！！
               clc
9 i# K! I3 K+ q& j) m/ ^7 Sclear
5 P5 f' K# p. T3 w5 @nx=60;
4 F! }1 h5 q; u9 ^9 hny=60;
% k5 G5 [4 f$ R$ k%定义固定障碍物的状态
! t; f+ ~# h$ @5 z$ f& j+ C4 gz=zeros(nx,ny);
peo=z;
" W3 a+ g6 ~$ ?%peoNew=z;
wall=z;
wall(1,1:ny)=1;
/ d) {# `) \! h9 Lwall(1:nx,1)=1;
wall(1:nx,ny)=1;
2 e. D4 c0 C* h0 ewall(nx,1:ny/2-2)=1;
3 J8 E" X% t9 l9 J$ b5 o2 r- C5 U# ]wall(nx,ny/2+2:ny)=1;
wall(nx/4:nx/4+1,ny/4:ny/4+1)=1;
wall(3*nx/4:3*nx/4+1,ny/4:ny/4+1)=1;
wall(nx/4:nx/4+1,3*ny/4:3*ny/4+1)=1;
wall(3*nx/4:3*nx/4+1,3*ny/4:3*ny/4+1)=1;
; q" @0 [/ |! G9 l  b%定义人的状态
) W/ v. |# q# {; Tfor x=1:1:12
, V. _2 ?: _. Z: P; G  o1 O    for y=1:1:12
        x1=round(rand(1)*59+1);
        x2=round(rand(1)*59+1);
1 i- }" A- G/ _9 b        if wall(x1,x2)~=1
           peo(x1,x2)=1;
       end
    end
; z0 P) A% o, r* H7 S# `end
%定义安全矩阵，指引人群运动
safe=zeros(60,60);
safe(nx,ny/2+1)=0;
safe(nx,ny/2+2)=0;
" d1 F: v+ x6 rsafe(nx,ny/2)=0;
safe(nx,ny/2-1)=0;
3 b6 I2 ~; `9 Xsafe(nx,ny/2-2)=0;
7 _8 W. L9 p' rfor i=nx-1:-1:2
5 s) g! p) i6 K4 |& r    for j=ny/2+3:-1:2
        safe(i,ny/2)=safe(i+1,ny/2)+1;
        safe(i,ny/2-1)=safe(i+1,ny/2-1)+1;
        safe(i,ny/2-2)=safe(i+1,ny/2-2)+1;
        safe(i,j)=safe(i,j+1)+1;
    end
7 v4 W( K' I1 C" _- K( u4 fend
0 O( `% l5 Y. M$ `for i=nx-1:-1:2
, i( d2 d/ ?' ^; F6 n  U    for j=ny/2+3:1:ny-1
! z6 c! X  a5 K9 t' A4 V        safe(i,ny/2+1)=safe(i+1,ny/2+1)+1;
8 u/ |4 R' }5 f( k) l        safe(i,ny/2+2)=safe(i+1,ny/2+2)+1;
* y+ H2 H; S% z. ?3 C: l( y        safe(i,j)=safe(i,j-1)+1;
    end
, Y$ e( b5 T& @: D. L( wend
        
imh=image(cat(3,z',peo',wall'));
5 i2 A) d$ _0 s1 K' |6 Hset(imh,'erasemode', 'none')
axis equal
* T: n1 \7 p0 m. x# laxis tight
%peoNew=peo;
1 a. y0 N. r2 K0 dxind=2:59;
yind=2:59;
for m=1:1000
    if peo(xind,yind)==1
       if safe(xind,yind-1)<safe(xind,yind)&wall(xind,yind-1)~=1
# X- r0 y( c8 Z* Y           peo(xind,yind-1)=1;
           peo(xind,yind)=0;
. r/ |0 u4 j1 e7 p       elseif safe(xind,yind+1)<safe(xind,yind)&wall(xind,yind+1)~=1
           peo(xind,yind+1)=1;
: [4 D6 M) j4 `( M2 h           peo(xind,yind)=0;
       elseif safe(xind-1,yind)<safe(xind,yind)&wall(xind-1,yind)~=1
           peo(xind-1,yind)=1;
* x- u9 R9 |; ^. F2 v6 [' ^           peo(xind,yind)=0;
       elseif  safe(xind+1,yind)<safe(xind,yind)&wall(xind+1,yind)~=1
           peo(xind+1,yind)=1;
  ?+ M) [+ V& Z2 U  `5 D2 w           peo(xind,yind)=0;
/ g& O3 V- `' {2 `       end
         peo=peoNew;
         set(imh, 'cdata', cat(3,z',peo',wall') )
; i7 E9 C( \$ ?; v  y         drawnow
* l8 q. v0 I3 m8 b$ w         end
end

etzhu

实际上不用那么麻烦，
首先这个问题必然是满足 贪心 前提的，所以可以首先计算出每个人移动到门口的时间，然后排序，从小到大出门，考虑相等时的拥塞，就可以了。
; `: O* z5 o: \5 `. u" R' C5 k. d当然，也有一点不足，这里没有考虑一个人挡在另一个人的路上的情况。

suxpert

up，友情帮顶。

sphereballball

现在是休息重要，别再动脑了

lxsoft110

2# etzhu
呵呵~兄弟。你还是没有说明我这个算法错误在哪里啊~

qsoft_cn

你调试一下可以发现，，if peo(xind,yind)==1 这个有问题，for循环里面的一次都没有执行。。。我正在想，应该有if find(peo(xind,yind)==1),，，厄，现在我该休息了。没时间再想了。元胞刚刚学习。。。。

wxl1988

我也要休息了~不看了~~好成绩·

cldndx

bless明天遇到顺手的题目！

victoriajh

注意休息啊 楼主

terrance_ho

up，友情帮顶。