急求帮改程序将矩阵原本的常数改为3*3矩阵元素(P只看第一個,P有誤已更正)

真龍虎王

9 V4 U7 B5 L) K) h; ?
9 P6 }9 |+ D+ r& c8 Z& Z7 o& A原本题目:                                     新增
! m0 o8 T8 ^$ U" w6 p7 z8 D   NO              GO          TO            P
* g  u4 g9 f- M7 n0 L& y    1                 0             1             7
, Z, S; v8 q* E) d8 N7 y    2                 1             2             7
    3                 1             4             1
    4                 2             3             6
3 S+ c+ t; G( C. h+ Z! Y' O& h3 w" s. h原程序:
NO=[1;2;3;4];
, H; V- \+ U: H5 e0 ^GO=[0;1;1;2];
TO=[1;2;4;3];
" J& D; c2 Q4 ^* k, }k=zeros(length(NO),length(NO));
$ I0 N: z  k. qa=sub2ind(size(k),NO,TO);
% B0 r* M! l2 e" M! H" ^k(a)=-1;
for i=1:length(NO)
4 t0 }, {% [5 v4 b- D6 x    s=i;
    while s>=2
" Z  V& U0 w+ }; f# ^1 ]4 m; B5 K        s=find(TO==GO(s));
        k(NO(s),(TO(i)))=-1;
    end
end
答:
0 c1 k3 f9 H/ l7 L! K9 ?7 eK=                TO    =             1    2     3    4           =[-1 -1 -1 -1;0 -1 -1 0;0 0 0 -1;0 0 -1 0]
0 `' D( f! Q6 b            NO  [     ]         1   [  -1   -1    -1   -1
) w% _. t. D! q) v  E  o                                   2       0   -1    -1    0
                                   3       0    0     0   -1
                                   4       0    0    -1    0 ]
! ]9 i, Q# G0 Q: _. k2 F/ q现在想改多看一个矩阵P    矩阵大小跟NO相同
+ G( p" }( N. M8 \9 X: A& x2 G6 P如 P=[7;7;1;6]
题目想改为
看NO找TO值再看GO值时顺便看P值
7 \* ^  J( Z6 H, t, G( b1 F0 k# }原本K是放入-1想改为当:
9 L! I! O. U5 ^7 K
PS:只看NO找TO时找到的第一个P值如果GO不是0那下一个的P不使用
" ]) T2 b& I, r8 V: |' j: L只用第一次找到的P

P=7    -1改为放入[-1 0 0;0 -1 0;0 0 -1]
& D& Q  \7 B3 ?: X  =6    -1改为放入[-1 0 0;0 0 0;0 0 -1]
  =5    -1改为放入[0 0 0;0 -1 0;0 0 -1]
- M- G- Z5 O9 A% _+ j) D  =4    -1改为放入[-1 0 0;0 -1 0;0 0 0]
  b# O/ A4 I/ E: z) W5 z! h: U8 n* R  =3    -1改为放入[0 0 0;0 0 0;0 0 -1]
  =2    -1改为放入[0 0 0;0 -1 0;0 0 0]
2 v0 n* N: D  ?* o; {9 N2 X  =1    -1改为放入[-1 0 0;0 0 0;0 0 0]
# \) v' y6 P$ H5 S: i
那原本的矩阵的零元素改為零3*3矩阵=[0 0 0;0 0 0;0 0 0]
8 m) F4 V/ x. [4 W$ Y目前卡关是卡在k矩阵大小是会因为P而变以及-1要改放入矩阵
  v& y! ]8 G6 y. ^) t答案会是
: h6 ~$ N# L4 w) r-1   0   0    -1   0   0     -1   0   0     -1   0    0
0  -1   0     0  -1   0      0   0   0      0   0    0
0   0  -1     0   0  -1      0   0  -1      0   0    0

0   0   0    -1   0   0     -1   0   0      0   0    0  
0   0   0     0  -1   0      0   0   0      0   0    0
0   0   0     0   0  -1      0   0  -1      0   0    0
/ }# C2 f& \' A
0   0   0     0   0   0      0   0   0      -1   0    0  
, M0 G: h$ j# G0   0   0     0   0   0      0   0   0      0   0    0
6 d2 D' l* O$ y1 ~; v% g# N5 P! B0   0   0     0   0   0      0   0   0      0   0    0

9 M$ f8 W5 O: H% U+ k0   0   0     0   0   0      -1   0   0      0   0    0  
, r* {0 o' q4 Q# |) s: [0   0   0     0   0   0      0   0   0      0   0    0
0   0   0     0   0   0      0   0  -1      0   0    0