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

真龍虎王

' N7 V/ h7 [& B1 U
恳请版上英雄能帮助小弟
原本题目:
2 u6 U, q: l) M. S5 v   NO              GO          TO
& L+ p8 e: \& M& T    1                 0             1
    2                 1             2
    3                 1             4
    4                 2             3
& W% z) W1 o2 L' M' i7 Z想表达
(1)NO=1再看TO=1找GO=0当GO=0表示结束
  _; J3 _" Q3 L, W' ?* E3 M* J所以K=          TO    =            1       =[-1];
             NO  [     ]         1   [ -1  ]
(2)NO=2再看TO=2找GO=1当GO不等于零 看跟GO一样数字的TO
- K( e& D5 F4 _                 看TO=1找GO=0当GO=0表示结束
( p# S" [" p1 `, Q1 x# w所以K=          TO    =             1    2    =[-1 -1;0 -1];
             NO  [     ]         1   [  -1   -1      
6 Z! Y) d9 j1 C                                    2       0   -1]
8 d3 r, f% w6 I# t$ r, x! i9 u(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];
& \! `+ n# R; P! K. w3 G2 ~  H# F  O             NO  [     ]         1   [  -1   -1     0   -1
                                    2       0   -1     0    0
                                    3       0    0     0   -1
                                    4       0    0     0    0 ]
(4)NO=3再看TO=3找GO=2当GO不等于零 看跟GO一样数字的TO
( }+ i0 ]' _% D                 看TO=2找GO=1当GO不等于零 看跟GO一样数字的TO
                 看TO=1找GO=0当GO=0表示结束
1 B/ ^6 O/ u9 U% I( @' N3 G所以K=          TO    =             1    2     3    4           
  a! g9 y. N' {8 F             NO  [     ]         1   [  -1   -1    -1   -1
                                    2       0   -1    -1    0
, Y& ]" k* \% l$ q% D+ H                                    3       0    0     0   -1
                                    4       0    0    -1    0 ]
& q1 P( m% a8 d程序:
; L: n- x+ ?' m8 I5 LNO=[1;2;3;4];
5 k+ _. o# J8 r- `; ?9 F( Y5 n( ~GO=[0;1;1;2];
TO=[1;2;4;3];
k=zeros(length(NO),length(NO));
; Q7 y. W7 @3 y( z, k8 q0 E1 R$ ia=sub2ind(size(k),NO,TO);
k(a)=-1;
for i=1:length(NO)
. ~: ]" r( Y1 k    s=i;
    while s>=2
        s=find(TO==GO(s));
* d( |; e2 C" q8 l4 B8 K0 ^( p2 k        k(NO(s),(TO(i)))=-1;
    end
2 v$ q6 a' g4 ~4 m3 |- t5 ~end

( X0 S: p; }) e现在想改多看一个矩阵P    矩阵大小跟NO相同
如 P=[7;7;6;1]
题目想改为
' [( q9 L4 B9 {% U. d0 h+ ]* f看NO找TO值再看GO值时顺便看P值
原本K是放入-1想改为当:
P=7    -1改为放入[-1 0 0;0 -1 0;0 0 -1]
  =6    -1改为放入[-1 0 0;0 0 0;0 0 -1]
  =5    -1改为放入[0 0;0 -1;0 -1]
  =4    -1改为放入[-1 0;0 -1;0 0]
6 Y& c6 V* w1 M1 e& M7 T% r! q  =3    -1改为放入[0;0;-1]
  =2    -1改为放入[0;-1;0]
2 F5 x6 l5 m# z, q1 L  =1    -1改为放入[-1;0;0]
8 F: p9 Q% ^7 X* e) }目前卡关是卡在k矩阵大小是会因为P而变以及-1要改放入矩阵