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

lxsoft110

我编这段程序的目的是为了模拟火灾中，一个房间里面的人员的撤离情况，运行出来，蓝色的点是障碍物、黑色是可以空地、绿色代表人。
我用的算法是：1.建立一个60*60的网格，并且定义边界和出口
                    2.给每个格子赋一个状态。（0，0，0）代表空地。（0，1，0）代表人，（0，0，1）代表障碍物。
, m1 z9 M" @% u$ Q  q+ G( e( B                     3.规定每隔一段时间，计算人的状态（看前后左右，哪个格子离门口近，而且无障碍物），就向那个格子移动。
" r( X, T, ~1 i3 M' N* ~7 H5 k$ V                      4。看所有人离开房间需要多少时间。
: d$ d- G0 C8 S% B# H0 _下面附上MATLAB程序：盼大牛解答！！不胜感激！！！
/ C/ V' P. e( F2 K2 U4 y               clc
# J* F- x6 E9 Y( v+ h3 b& ^+ Tclear
% Y( Z7 y) G# o" t- Z1 A) h! ~nx=60;
3 a% z+ K3 `% w6 s2 D: b) a, kny=60;
# _/ {5 g& T7 B%定义固定障碍物的状态
z=zeros(nx,ny);
peo=z;
4 |: f4 i1 G; c* ~8 W%peoNew=z;
' V9 }5 K; ^2 P: D# N  E, jwall=z;
$ x' U5 @) q6 ]) f. \; Twall(1,1:ny)=1;
9 D) y6 k5 r  ?% V" Y! Vwall(1:nx,1)=1;
+ g% N9 y: h' |5 u( i: F; c( D" T9 Rwall(1:nx,ny)=1;
; `; E: |" a$ w& Y/ F: `; e* Lwall(nx,1:ny/2-2)=1;
7 a4 `* N  A. {4 N, W) ?# Jwall(nx,ny/2+2:ny)=1;
wall(nx/4:nx/4+1,ny/4:ny/4+1)=1;
5 x7 U; e& ~8 z: G  t/ ^  ywall(3*nx/4:3*nx/4+1,ny/4:ny/4+1)=1;
) V" w$ c' B* O2 ^$ Gwall(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;
%定义人的状态
for x=1:1:12
5 a3 m6 ~- u' \8 _: H& P    for y=1:1:12
( E% q8 G4 t* T  v4 N+ W2 K        x1=round(rand(1)*59+1);
( }8 [8 y) ?! U0 d/ |        x2=round(rand(1)*59+1);
        if wall(x1,x2)~=1
           peo(x1,x2)=1;
& c$ d# a  y! @$ n8 _, T' P7 G       end
; s" T5 E/ Q3 F9 H0 a" ]3 D    end
7 j2 j5 O( G# G% `5 j4 i6 yend
%定义安全矩阵，指引人群运动
safe=zeros(60,60);
5 S/ w) u0 |2 u/ Jsafe(nx,ny/2+1)=0;
; [. y! S1 [0 ?- L1 lsafe(nx,ny/2+2)=0;
' ]# I# C5 j& g0 ^" N; gsafe(nx,ny/2)=0;
- p1 r5 K' w% M7 I$ Z5 Ysafe(nx,ny/2-1)=0;
safe(nx,ny/2-2)=0;
$ v% ~4 a2 m- c# Ofor i=nx-1:-1:2
    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;
" c7 I* H8 o! l; f" j6 M! u; H5 h        safe(i,ny/2-2)=safe(i+1,ny/2-2)+1;
        safe(i,j)=safe(i,j+1)+1;
5 ^4 y% w2 |7 j' v; k0 e9 V0 I    end
end
& |& Y4 j9 T7 |  Mfor i=nx-1:-1:2
    for j=ny/2+3:1:ny-1
        safe(i,ny/2+1)=safe(i+1,ny/2+1)+1;
2 h7 z1 w$ l  o9 D        safe(i,ny/2+2)=safe(i+1,ny/2+2)+1;
        safe(i,j)=safe(i,j-1)+1;
    end
end
; s# i' g+ U4 i; B6 |9 F8 @3 h( a        
imh=image(cat(3,z',peo',wall'));
set(imh,'erasemode', 'none')
. x4 t. d; j) _" G" M5 ~axis equal
axis tight
( _$ j) \5 t3 ~, Z# n$ ]%peoNew=peo;
8 M# q6 g* K9 j# i5 x1 K1 f+ U$ ~xind=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
           peo(xind,yind-1)=1;
' I8 _/ S$ `! }           peo(xind,yind)=0;
       elseif safe(xind,yind+1)<safe(xind,yind)&wall(xind,yind+1)~=1
           peo(xind,yind+1)=1;
5 x% L3 p% f* B2 Q* H           peo(xind,yind)=0;
" I; e  I3 j& C- _' r+ Z2 j       elseif safe(xind-1,yind)<safe(xind,yind)&wall(xind-1,yind)~=1
* l# z( v+ O! F% z  L5 U, Y           peo(xind-1,yind)=1;
           peo(xind,yind)=0;
  d( e6 h# i7 V. U) q       elseif  safe(xind+1,yind)<safe(xind,yind)&wall(xind+1,yind)~=1
           peo(xind+1,yind)=1;
           peo(xind,yind)=0;
       end
( b% n( T4 X2 v  B, O# y3 h1 s         peo=peoNew;
         set(imh, 'cdata', cat(3,z',peo',wall') )
         drawnow
. D, s7 W5 y$ h6 R7 g         end
) f: N* Z# o( Z" P5 Y! Fend

etzhu

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

suxpert

up，友情帮顶。

sphereballball

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

lxsoft110

2# etzhu
: r( \  @" E$ _1 |, t! S呵呵~兄弟。你还是没有说明我这个算法错误在哪里啊~

qsoft_cn

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

wxl1988

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

cldndx

bless明天遇到顺手的题目！

victoriajh

注意休息啊 楼主

terrance_ho

up，友情帮顶。