数学建模十类经典算法(6)

百年孤独

11、如果A(r,c)出现在等号的左边，并且用(r,c)声明的一个或者多个元素并不存在，就根据需要将A扩展，并将扩展位置上的元素置为0，这样就使得A(r,c)均指向已知元素，但是，如果数组A出现在等号右边，那么A(r,c)所指向的所有元素都必须存在，否则就返回一个出错信息。
简而言之，A(r,c)出现在等号左边时，若该值存在，则输出，若该值不存在，则赋值为0；
A(r,c)出现在等号右边时，若该值存在，则赋值，若该值不存在，则报错；
3 ^9 ]  m/ B0 m12、D(4:end,5:end)=[]会报错，因为这个区域不是拐角形状，而是这个矩阵的右下角；
3 X  d% u* z1 u1 W! m3 T5 I* W可以用D(4:end,5:end)=1很明显的看出来：
( t% [' O" b6 V5 h# l3 ND =
1 t4 b; D$ [4 ]5 W
0 n& B0 |7 S4 I) _5 o3 w  L1 0 0 0 0 0 0 0 0 0 0 0 0 0 0
* F- h# y6 Z6 r0 2 0 0 0 0 0 0 0 0 0 0 0 0 0
0 0 3 0 0 0 0 0 0 0 0 0 0 0 0
0 0 0 4 1 1 1 1 1 1 1 1 1 1 1
0 0 0 0 1 1 1 1 1 1 1 1 1 1 1
  [  K$ d9 J0 A& G( i- K0 0 0 0 1 1 1 1 1 1 1 1 1 1 1
) _# X. w. C, P& ~+ o) ?0 0 0 0 1 1 1 1 1 1 1 1 1 1 1
0 0 0 0 1 1 1 1 1 1 1 1 1 1 1
0 0 0 0 1 1 1 1 1 1 1 1 1 1 1
0 0 0 0 1 1 1 1 1 1 1 1 1 1 1
0 0 0 0 1 1 1 1 1 1 1 1 1 1 1
  z3 g1 q* U7 I! ]8 d. f" k0 0 0 0 1 1 1 1 1 1 1 1 1 1 1
0 0 0 0 1 1 1 1 1 1 1 1 1 1 1
0 0 0 0 1 1 1 1 1 1 1 1 1 1 1
+ L5 h8 m1 x6 C" S- r0 0 0 0 1 1 1 1 1 1 1 1 1 1 1
) x9 X7 l: p6 t9 w& F8 L  z而如果想要只保留矩阵的左上角的部分，正确的删除命令如下：
D(4:end,=[],D(:,5:end)=[]
- e1 Y) K! d0 @6 e, n5 A/ z我们可以用D(4:end,=1,D(:,5:end)=1将删去的部分显而易见的标示出来：
+ s1 f( q9 ?6 j+ E* lD =
1 R4 z/ R1 M, t8 d
1 0 0 0 1 1 1 1 1 1 1 1 1 1 1
0 2 0 0 1 1 1 1 1 1 1 1 1 1 1
0 0 3 0 1 1 1 1 1 1 1 1 1 1 1
1 1 1 1 1 1 1 1 1 1 1 1 1 1 1
8 ^! Y9 k4 \( B- n- n$ g1 1 1 1 1 1 1 1 1 1 1 1 1 1 1
! s/ F3 Q) r% ^6 x! {/ v& c6 ?( k1 1 1 1 1 1 1 1 1 1 1 1 1 1 1
, \; s) S+ z$ h1 O/ t2 V5 i1 1 1 1 1 1 1 1 1 1 1 1 1 1 1
1 1 1 1 1 1 1 1 1 1 1 1 1 1 1
1 1 1 1 1 1 1 1 1 1 1 1 1 1 1
9 k' a! F+ L# ^* O9 d1 1 1 1 1 1 1 1 1 1 1 1 1 1 1
1 1 1 1 1 1 1 1 1 1 1 1 1 1 1
  B$ L  |* w% O- p: ?1 1 1 1 1 1 1 1 1 1 1 1 1 1 1
0 a! N. C, I9 x) i2 v" A+ r1 1 1 1 1 1 1 1 1 1 1 1 1 1 1
4 z/ f3 b# r' `1 1 1 1 1 1 1 1 1 1 1 1 1 1 1
1 1 1 1 1 1 1 1 1 1 1 1 1 1 1
$ X3 L7 V6 j7 }13、插入行或列，要注意反向依次调用数据的时候，步长为-1
a=[1:15]
B=diag(a)
B(:,7)=[]
/ _" u+ B2 z2 I* J1 U" yB(:,end+1:-1:7)=B(:,end:-1:6)
2 p. G6 g" G* ]" Y+ ZB(:,7)=0,B(7,7)=7
; R( A! d# H7 P, X
; K- d( ]! }' a5 @8 c. t, c