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

真龍虎王

7 X1 d0 s/ l: ]) Z$ |( L+ Z0 _恳请版上英雄能帮助小弟
原本题目:
5 w3 w9 ^5 O9 t+ _) d" v$ b2 N8 i/ P7 W1 E   NO              GO          TO
    1                 0             1
9 d9 i8 w& |+ K6 l8 k    2                 1             2
    3                 1             4
, E& b7 p- ~. v- X+ J8 _% t0 E; M    4                 2             3
9 ?! g& m1 E* h, v. s6 Y想表达
(1)NO=1再看TO=1找GO=0当GO=0表示结束
" u( U* ?: E/ _- i2 w  H" s9 Q所以K=          TO    =            1       =[-1];
             NO  [     ]         1   [ -1  ]
(2)NO=2再看TO=2找GO=1当GO不等于零 看跟GO一样数字的TO
                 看TO=1找GO=0当GO=0表示结束
% d- |+ n& W8 Y所以K=          TO    =             1    2    =[-1 -1;0 -1];
             NO  [     ]         1   [  -1   -1      
                                    2       0   -1]
(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
6 \7 {3 @& f. K" p- M" i                                    2       0   -1     0    0
& g* P0 ]: L$ w* l' r5 @1 G# z                                    3       0    0     0   -1
+ P; o0 R) v/ b8 a  A. Z9 ]                                    4       0    0     0    0 ]
(4)NO=3再看TO=3找GO=2当GO不等于零 看跟GO一样数字的TO
1 a9 R( |+ d" P: u! \5 P                 看TO=2找GO=1当GO不等于零 看跟GO一样数字的TO
' [% J' P$ v0 t) X; B' s  X% R. t                 看TO=1找GO=0当GO=0表示结束
所以K=          TO    =             1    2     3    4           
             NO  [     ]         1   [  -1   -1    -1   -1
                                    2       0   -1    -1    0
                                    3       0    0     0   -1
2 z7 ?1 L  F* i( W% T) P5 ?; B% C                                    4       0    0    -1    0 ]
程序:
6 n) ?. G) Y% Z+ [! S6 `NO=[1;2;3;4];
) _, S4 e# ?- r; gGO=[0;1;1;2];
/ Y  l  a9 R' {. l: \TO=[1;2;4;3];
$ t! m* z6 E1 M# u8 Xk=zeros(length(NO),length(NO));
$ ^  V$ M3 g' da=sub2ind(size(k),NO,TO);
k(a)=-1;
for i=1:length(NO)
! E& i0 ]+ l* I5 q! s3 `9 Z' j" d    s=i;
3 n; z  ]2 _3 W    while s>=2
        s=find(TO==GO(s));
+ a8 x# I) i" L+ H0 d, P        k(NO(s),(TO(i)))=-1;
) E: O8 X' X+ z& K    end
4 i# r9 |* R. B/ H! l3 ?( B( E. Vend
3 x! {8 w$ v1 A: ]  h: I! l1 Z
3 t5 j. ?  f* y7 m现在想改多看一个矩阵P    矩阵大小跟NO相同
如 P=[7;7;6;1]
6 Z7 {# p' Q. F/ z题目想改为
8 I) v: E& h/ r1 t3 }* W6 R3 o看NO找TO值再看GO值时顺便看P值
原本K是放入-1想改为当:
P=7    -1改为放入[-1 0 0;0 -1 0;0 0 -1]
  I9 x# T6 R4 {4 G: l  =6    -1改为放入[-1 0 0;0 0 0;0 0 -1]
  =5    -1改为放入[0 0;0 -1;0 -1]
9 \3 ~% Z2 K, h5 v  =4    -1改为放入[-1 0;0 -1;0 0]
4 d8 X; u6 P7 M* O8 M  =3    -1改为放入[0;0;-1]
  B1 J6 i) {  C( `  =2    -1改为放入[0;-1;0]
  =1    -1改为放入[-1;0;0]
" h2 ?( i9 E. M" [* t5 }目前卡关是卡在k矩阵大小是会因为P而变以及-1要改放入矩阵