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

真龍虎王

1 O2 c& j, j9 J0 N0 i. F恳请版上英雄能帮助小弟
6 o  q4 ~8 ?: F2 a原本题目:
5 \& q. y# N6 A. W' U9 Y   NO              GO          TO
    1                 0             1
    2                 1             2
    3                 1             4
+ Y9 \. D' b' I8 i. q    4                 2             3
想表达
9 Q& b. X* _3 @4 E(1)NO=1再看TO=1找GO=0当GO=0表示结束
4 ~8 E( `6 X/ o' m所以K=          TO    =            1       =[-1];
# B8 _; y) {. ^0 w. }1 ^' @$ p             NO  [     ]         1   [ -1  ]
(2)NO=2再看TO=2找GO=1当GO不等于零 看跟GO一样数字的TO
                 看TO=1找GO=0当GO=0表示结束
0 [- h. J+ ~7 e所以K=          TO    =             1    2    =[-1 -1;0 -1];
4 |$ u5 M9 b. w             NO  [     ]         1   [  -1   -1      
                                    2       0   -1]
4 u$ ?8 c, v2 U. W/ t. `(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];
             NO  [     ]         1   [  -1   -1     0   -1
2 y. V& j- ^9 h/ ^, l$ ]% T                                    2       0   -1     0    0
* U2 T. T+ L& P* a0 h                                    3       0    0     0   -1
) S. b+ `$ W+ A+ }; `                                    4       0    0     0    0 ]
! ?7 S: [2 V7 D+ s- h" `4 {(4)NO=3再看TO=3找GO=2当GO不等于零 看跟GO一样数字的TO
  `4 d) c# V* O* j1 i                 看TO=2找GO=1当GO不等于零 看跟GO一样数字的TO
3 X5 y: k# l: K% @8 d4 l" Y7 I* F& k                 看TO=1找GO=0当GO=0表示结束
所以K=          TO    =             1    2     3    4           
             NO  [     ]         1   [  -1   -1    -1   -1
                                    2       0   -1    -1    0
% p9 L4 B* R6 h/ C3 G                                    3       0    0     0   -1
                                    4       0    0    -1    0 ]
; ^- @4 E( I: b6 t) Q0 h  ?* p程序:
% Y: Y1 U( N$ H- K) LNO=[1;2;3;4];
0 I4 L/ B4 q. }- C! A0 G  RGO=[0;1;1;2];
2 f3 h6 Y! m* B/ Z" s) H: p- R9 B# |TO=[1;2;4;3];
k=zeros(length(NO),length(NO));
a=sub2ind(size(k),NO,TO);
4 x3 P- X: U* G' s) B2 S! Q: _k(a)=-1;
for i=1:length(NO)
    s=i;
    while s>=2
        s=find(TO==GO(s));
        k(NO(s),(TO(i)))=-1;
: m: U0 @( U8 a    end
2 n6 X  y/ I$ O( s! r6 F3 b$ y+ Q6 `end
' _$ k+ w0 s. x" Z2 Z
: l0 I0 i% |$ E9 _# [" Y现在想改多看一个矩阵P    矩阵大小跟NO相同
$ q2 R7 G% O# M6 `如 P=[7;7;6;1]
题目想改为
看NO找TO值再看GO值时顺便看P值
5 N; x/ _) J7 `; h8 K7 }7 O  N, n原本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]
& Y6 @! {3 m% U" Y4 ^  =3    -1改为放入[0;0;-1]
7 x# W$ J4 o$ Z0 P* A. v  =2    -1改为放入[0;-1;0]
  =1    -1改为放入[-1;0;0]
目前卡关是卡在k矩阵大小是会因为P而变以及-1要改放入矩阵