2010/03/02 求高手相助Matlab程序修改求助

真龍虎王

恳请版上英雄能帮助小弟
原本题目:
   NO              GO          TO
7 |( D9 D, v( L/ k2 ^    1                 0             1
& F6 X) j3 K) A& a# Z6 t    2                 1             2
    3                 1             4
  T2 ^) x& G) A" g8 ~+ c* j    4                 2             3
想表达
: m; ?6 ^' X2 w% G, s(1)NO=1再看TO=1找GO=0当GO=0表示结束
: a/ V6 }5 u7 L( @所以K=          TO    =            1       =[-1];
! p7 A" M' q; G5 V, w4 E3 e, K             NO  [     ]         1   [ -1  ]
5 A" Z4 {. `( b(2)NO=2再看TO=2找GO=1当GO不等于零 看跟GO一样数字的TO
0 v/ \5 q4 W6 b( Z5 G) a                 看TO=1找GO=0当GO=0表示结束
# R7 Q" c6 Y) S. |' u% R1 S8 c所以K=          TO    =             1    2    =[-1 -1;0 -1];
4 d9 E1 R# a& I             NO  [     ]         1   [  -1   -1      
3 F6 H2 F0 G9 T4 _( z- [                                    2       0   -1]
$ F; l+ i$ B+ S6 i( o* G/ C% m7 y! O(3)NO=3再看TO=4找GO=1当GO不等于零 看跟GO一样数字的TO
                 看TO=1找GO=0当GO=0表示结束
所以K=          TO    =             1    2     3    4           =[-1 -1 0 -1;0 -1 0 0;0 0 0 -1;0 0 0 0];
$ D0 ]4 b2 y! o$ i9 O. m             NO  [     ]         1   [  -1   -1     0   -1
                                    2       0   -1     0    0
( L, z! `/ d* Q; }$ [) ?                                    3       0    0     0   -1
                                    4       0    0     0    0 ]
(4)NO=3再看TO=3找GO=2当GO不等于零 看跟GO一样数字的TO
                 看TO=2找GO=1当GO不等于零 看跟GO一样数字的TO
# u, L. ?$ J: j' L2 b                 看TO=1找GO=0当GO=0表示结束
$ z' E0 z' a( f' I! s所以K=          TO    =             1    2     3    4           
             NO  [     ]         1   [  -1   -1    -1   -1
/ ?5 w+ j8 t3 u1 \: P& L% t                                    2       0   -1    -1    0
" k! p$ t8 k3 x+ p: K1 d1 ?% I                                    3       0    0     0   -1
- L! Q* ~; Q+ ^8 H4 r& M3 a                                    4       0    0    -1    0 ]
程序:
NO=[1;2;3;4];
( Y* i% ?1 k' w0 H. y# w/ J. y  NGO=[0;1;1;2];
TO=[1;2;4;3];
# N- y0 r: k+ ?4 h+ m' v2 O8 F! qk=zeros(length(NO),length(NO));
a=sub2ind(size(k),NO,TO);
k(a)=-1;
1 E# G9 y3 i5 x+ y2 Ffor i=1:length(NO)
    s=i;
% w' w- j8 U2 d4 b, n8 q3 ~    while s>=2
        s=find(TO==GO(s));
        k(NO(s),(TO(i)))=-1;
    end
end
5 e) a# Q+ T! A# n9 D
现在想改多看一个矩阵P    矩阵大小跟NO相同
如 P=[7;7;6;1]
题目想改为
' h/ }! z2 Q" E; p看NO找TO值再看GO值时顺便看P值
原本K是放入-1想改为当:
  P7 d' q; B; e6 ^- c' j5 Q1 KP=7    -1改为放入[-1 0 0;0 -1 0;0 0 -1]
1 O0 C; h9 ~8 t" D5 N  =6    -1改为放入[-1 0 0;0 0 0;0 0 -1]
  =5    -1改为放入[0 0;0 -1;0 -1]
  W7 B' K/ e1 t' R- T; p2 `" ^" g8 r, V( D  =4    -1改为放入[-1 0;0 -1;0 0]
1 a, l* k* v6 i, B6 ~1 R: R  =3    -1改为放入[0;0;-1]
0 ?/ O9 L) h! s4 }$ s; U6 c  =2    -1改为放入[0;-1;0]
6 b6 s2 o# @' _0 I  k+ g" w  =1    -1改为放入[-1;0;0]
目前卡关是卡在k矩阵大小是会因为P而变以及-1要改放入矩阵