次对角线以后的没办法在按规律赋值为1了怎么办？

limopcb

如何生成沿着次对角线方向的元素 并进行算术平均

* t! H* Y6 F9 N3 X* g, j4 T

& w2 U" Y* F; f7 ^4 z1 p: j! x# I1     0     0     0     0
" h1 C3 \: c, H* m8 x
     0     0     0     0     0
! N& [9 J$ G% U0 q9 s2 \7 ]; g
     0     0     0     0     0

* q3 n9 [& s  i$ T- }     0     0     0     0     0
  B. P2 Z. R9 T: p" v


9 @- p) n2 ~+ M0 j: Y0 F

8 O8 x+ [  \$ f9 }M =


3 j5 N8 W, D# q
% b( `' c$ ^. a, a     0     0     1     0     0

$ \: X0 h8 F/ Y$ Q9 p     0     1     0     0     0
0 j& Y' r6 A! e* ~6 p% |2 ?& x' V
     1     0     0     0     0

" P) g3 c  G9 h( l2 z+ i3 u     0     0     0     0     0
. ^# a- O  t% C' i5 E  `0 n* D
     0     0     0     0     0
, Z& u; E" X" {3 B- `" r




' _: K6 M/ K1 e6 U1 f% CM =

8 d3 d/ U: S3 t5 c8 x" L& [
  F7 m+ u" c& t" b) C0 A
6 o/ y4 Q7 b9 C1 Y$ Y: |* ?     0     0     0     1     0

0 \, W2 X! J" H* E     0     0     1     0     0

     0     1     0     0     0
/ J5 W2 c( S% ^- L6 `% l) X
     1     0     0     0     0

     0     0     0     0     0

7 H# b4 y5 B  e' ~2 w8 ]6 G- j

' H$ T" }- ~) U  I6 j  W; v

6 R/ w  ^7 S7 C* T% x: RM =



     0     0     0     0     1

$ h# f9 [. W: y2 D$ u; T8 U     0     0     0     1     0

     0     0     1     0     0

     0     1     0     0     0

     1     0     0     0     0
  R/ f, g4 a) S3 D0 q0 ^$ i

/ x6 e% C' N# W( ffor n=1:5

   M= flip(eye(n));

, E; u/ i; Z) c$ h$ B$ ^+ A8 K   M(5,5)=0
; M' F2 Z- {8 R. v
' J% i& y$ L+ b$ h" L   M
* d" T" y1 T- ~0 b4 z  u1 B8 @
end
问题是次对角线以后的没办法在按规律赋值为1了，请教大神，非常感谢！

Colbie

可以联用rot90和diag函数，举例
vector = 1:5;
- G1 D7 x. r8 t/ T" hM = rot90( diag(vector,1) )
7 Q& Q# m! ?( x% ]
; f# K+ C1 r# ~  _# T: O, r     0     0     0     0     5     0
& J; F4 O; C2 K* \     0     0     0     4     0     0
1 T+ |5 }2 I& P" J9 W) ]# P0 V' h' u     0     0     3     0     0     0
# F' I3 B$ ^5 U: O) i$ G' Q     0     2     0     0     0     0
/ t) G0 e7 }( t& ?% [/ Y- u/ B$ r     1     0     0     0     0     0
* l/ K# M7 i6 p     0     0     0     0     0     0
vector = 1:5;rot90( diag(vector,-1) )

     0     0     0     0     0     0
/ q! y9 U( T- u6 W4 N     0     0     0     0     0     5
     0     0     0     0     4     0
     0     0     0     3     0     0
     0     0     2     0     0     0
, k% z4 n  k; z' X* b8 x- l# F     0     1     0     0     0     0