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

lxsoft110

我编这段程序的目的是为了模拟火灾中，一个房间里面的人员的撤离情况，运行出来，蓝色的点是障碍物、黑色是可以空地、绿色代表人。
我用的算法是：1.建立一个60*60的网格，并且定义边界和出口
2 v' ~5 p: O! M, }2 N" `                    2.给每个格子赋一个状态。（0，0，0）代表空地。（0，1，0）代表人，（0，0，1）代表障碍物。
$ b+ [$ M" q' _/ J% k                     3.规定每隔一段时间，计算人的状态（看前后左右，哪个格子离门口近，而且无障碍物），就向那个格子移动。
                      4。看所有人离开房间需要多少时间。
7 l# X2 h3 {" ~6 j# c, e下面附上MATLAB程序：盼大牛解答！！不胜感激！！！
, G) M- g. n' R: z( B2 D               clc
clear
7 Q3 {6 `, w. Lnx=60;
9 c2 _0 `' n" X* `ny=60;
6 S! f; y1 R6 b4 W7 ~$ u%定义固定障碍物的状态
z=zeros(nx,ny);
. k5 A3 y* b6 Q: L% b* g  v! y, `5 Dpeo=z;
%peoNew=z;
wall=z;
4 l( [! A- n: K; U; W- h; ^wall(1,1:ny)=1;
wall(1:nx,1)=1;
+ e1 o+ Z' @& p6 N4 ]7 J1 F' z3 o* Lwall(1:nx,ny)=1;
wall(nx,1:ny/2-2)=1;
7 d) s5 l; c2 N& c; h3 n/ Jwall(nx,ny/2+2:ny)=1;
wall(nx/4:nx/4+1,ny/4:ny/4+1)=1;
  D( y/ R1 S) R& ?" Z. Ywall(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;
& G; M' E" I9 C/ n- _0 G: qwall(3*nx/4:3*nx/4+1,3*ny/4:3*ny/4+1)=1;
%定义人的状态
for x=1:1:12
    for y=1:1:12
        x1=round(rand(1)*59+1);
        x2=round(rand(1)*59+1);
: U9 Q& D' Z8 v, D% |( L- w, ]        if wall(x1,x2)~=1
! d! y: U3 y: R5 g2 \: {% O           peo(x1,x2)=1;
* K7 M' D' G8 Z) Y5 x* Z       end
* ]9 U; P: J! h$ L2 [$ F    end
2 Y, o9 U# Y3 _# f* p! Hend
%定义安全矩阵，指引人群运动
safe=zeros(60,60);
safe(nx,ny/2+1)=0;
safe(nx,ny/2+2)=0;
safe(nx,ny/2)=0;
$ a9 @% {( B5 h0 I; t1 A2 Gsafe(nx,ny/2-1)=0;
6 [) e4 k# J& R; G* ?safe(nx,ny/2-2)=0;
for i=nx-1:-1:2
3 j0 M2 w4 S$ S, C; \    for j=ny/2+3:-1:2
2 ]* h8 k# c  ^, c0 K0 g+ @- Z        safe(i,ny/2)=safe(i+1,ny/2)+1;
0 i* o5 k" p0 P) m& V& _+ h4 y- f: }        safe(i,ny/2-1)=safe(i+1,ny/2-1)+1;
) a7 g8 _2 c! G4 z        safe(i,ny/2-2)=safe(i+1,ny/2-2)+1;
        safe(i,j)=safe(i,j+1)+1;
2 W/ ]* n3 s% [* Z: z    end
end
# W$ Q% t6 K7 a, x" r8 Jfor i=nx-1:-1:2
6 u( ?& ^# a! E1 J6 T8 D" u    for j=ny/2+3:1:ny-1
- T6 {- C( x5 X* ]! ^        safe(i,ny/2+1)=safe(i+1,ny/2+1)+1;
6 j2 K5 w! p5 C7 q- C! o        safe(i,ny/2+2)=safe(i+1,ny/2+2)+1;
) M* m5 n  p: M4 [7 y! D- H        safe(i,j)=safe(i,j-1)+1;
    end
end
        
imh=image(cat(3,z',peo',wall'));
set(imh,'erasemode', 'none')
1 C2 q, V) c! V3 e/ w# b& L, G, ^axis equal
axis tight
%peoNew=peo;
xind=2:59;
: A8 G8 _$ i' p4 Ryind=2:59;
, M# r4 R1 [, C( Qfor m=1:1000
    if peo(xind,yind)==1
7 l2 }1 k7 w+ n/ t5 L       if safe(xind,yind-1)<safe(xind,yind)&wall(xind,yind-1)~=1
. @! S7 i. ~- w5 C3 N2 X( H( ~           peo(xind,yind-1)=1;
           peo(xind,yind)=0;
       elseif safe(xind,yind+1)<safe(xind,yind)&wall(xind,yind+1)~=1
           peo(xind,yind+1)=1;
           peo(xind,yind)=0;
       elseif safe(xind-1,yind)<safe(xind,yind)&wall(xind-1,yind)~=1
% c* B. x# v  x9 m           peo(xind-1,yind)=1;
           peo(xind,yind)=0;
& e: D, E$ e0 O/ n1 U       elseif  safe(xind+1,yind)<safe(xind,yind)&wall(xind+1,yind)~=1
           peo(xind+1,yind)=1;
           peo(xind,yind)=0;
6 b: ]6 b+ Q5 X; c  Z* r# M       end
7 f! N: S: G7 g! _6 w2 k         peo=peoNew;
         set(imh, 'cdata', cat(3,z',peo',wall') )
+ ~( u# Z8 c6 `& b         drawnow
7 ?' k$ w+ t- V! H" y- d/ `( \         end
; u& U7 i( R0 Q/ _4 F( T0 W+ Gend

etzhu

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

suxpert

up，友情帮顶。

sphereballball

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

lxsoft110

2# etzhu
+ E& |" B) K) k0 V呵呵~兄弟。你还是没有说明我这个算法错误在哪里啊~

qsoft_cn

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

wxl1988

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

cldndx

bless明天遇到顺手的题目！

victoriajh

注意休息啊 楼主

terrance_ho

up，友情帮顶。