# How do you make the diagonal and certain off-diagonal elements of a matrix zero?

조회 수: 44(최근 30일)
L'O.G. 2023년 2월 14일
댓글: Walter Roberson 2023년 2월 14일
I have a square matrix and would like to make the diagonal elements zero, as well as select elements that are off-diagonal. For the latter, I only want the elements next to (one removed from) the diagonal to be zero, e.g., I would want A(5,6) and A(6,5) to be 0 for a matrix A. I can do the former part for the diagonal by
A_new = A - diag(diag(A));
But how do I do the part for the off-diagonal?

댓글을 달려면 로그인하십시오.

### 채택된 답변

Walter Roberson 2023년 2월 14일
S = spdiags(Bin,d,A) replaces the diagonals in A specified by d with the columns of Bin.
... after which you would full()
This could be used directly to replace diagonals -1:1 with zeros. Or you could use spdiags twice to extract multiple diagonals simultaneously and create a matrix with just those, and subtract from the original... the generalization of your current code.
##### 댓글 수: 2표시 이전 댓글 수: 1숨기기 이전 댓글 수: 1
Walter Roberson 2023년 2월 14일
n = 9;
A = rand(n)
A = 9×9
0.8787 0.9000 0.3293 0.7781 0.9511 0.4674 0.5774 0.0860 0.1346 0.5791 0.2043 0.2635 0.7183 0.4309 0.0203 0.9671 0.0253 0.7339 0.8793 0.8386 0.7464 0.8748 0.7670 0.0196 0.9867 0.3659 0.9148 0.2191 0.4816 0.5973 0.9866 0.5886 0.8485 0.0188 0.9976 0.1732 0.9975 0.8073 0.9317 0.4963 0.1424 0.6094 0.0971 0.9048 0.4144 0.9345 0.9627 0.8312 0.5215 0.4967 0.4954 0.6387 0.0993 0.1622 0.0785 0.8886 0.3785 0.6098 0.2500 0.0021 0.2668 0.6566 0.8886 0.9968 0.6688 0.3537 0.3499 0.1719 0.3704 0.5856 0.3745 0.9827 0.7165 0.0935 0.0269 0.7502 0.6695 0.5330 0.0463 0.2427 0.8659
newA = full(spdiags(zeros(9,3), -1:1, A))
newA = 9×9
0 0 0.3293 0.7781 0.9511 0.4674 0.5774 0.0860 0.1346 0 0 0 0.7183 0.4309 0.0203 0.9671 0.0253 0.7339 0.8793 0 0 0 0.7670 0.0196 0.9867 0.3659 0.9148 0.2191 0.4816 0 0 0 0.8485 0.0188 0.9976 0.1732 0.9975 0.8073 0.9317 0 0 0 0.0971 0.9048 0.4144 0.9345 0.9627 0.8312 0.5215 0 0 0 0.0993 0.1622 0.0785 0.8886 0.3785 0.6098 0.2500 0 0 0 0.8886 0.9968 0.6688 0.3537 0.3499 0.1719 0.3704 0 0 0 0.7165 0.0935 0.0269 0.7502 0.6695 0.5330 0.0463 0 0

댓글을 달려면 로그인하십시오.

### 추가 답변(1개)

Torsten 2023년 2월 14일
편집: Torsten 2023년 2월 14일
n = 9;
A = rand(n)
A = 9×9
0.1775 0.9064 0.8468 0.0887 0.5042 0.2522 0.9969 0.4269 0.8669 0.5412 0.5086 0.7654 0.8466 0.7660 0.1267 0.5925 0.4179 0.2214 0.3812 0.9799 0.0524 0.7062 0.0993 0.2886 0.3217 0.2389 0.3402 0.4666 0.4828 0.9887 0.4107 0.0607 0.3509 0.1436 0.0533 0.8215 0.9084 0.9898 0.4007 0.2539 0.0025 0.2415 0.1024 0.8357 0.0494 0.0396 0.8522 0.2150 0.2113 0.0925 0.9267 0.3426 0.5880 0.2066 0.3261 0.8049 0.8634 0.7682 0.4854 0.6717 0.9052 0.2654 0.1252 0.4238 0.8070 0.3574 0.1515 0.5762 0.4482 0.5737 0.8663 0.7392 0.2939 0.9826 0.1098 0.7926 0.0099 0.5213 0.6287 0.4949 0.1724
for i=1:n-1
A(i,i+1) = 0.0;
A(i+1,i) = 0.0;
end
A
A = 9×9
0.1775 0 0.8468 0.0887 0.5042 0.2522 0.9969 0.4269 0.8669 0 0.5086 0 0.8466 0.7660 0.1267 0.5925 0.4179 0.2214 0.3812 0 0.0524 0 0.0993 0.2886 0.3217 0.2389 0.3402 0.4666 0.4828 0 0.4107 0 0.3509 0.1436 0.0533 0.8215 0.9084 0.9898 0.4007 0 0.0025 0 0.1024 0.8357 0.0494 0.0396 0.8522 0.2150 0.2113 0 0.9267 0 0.5880 0.2066 0.3261 0.8049 0.8634 0.7682 0.4854 0 0.9052 0 0.1252 0.4238 0.8070 0.3574 0.1515 0.5762 0.4482 0 0.8663 0 0.2939 0.9826 0.1098 0.7926 0.0099 0.5213 0.6287 0 0.1724
##### 댓글 수: 1표시 없음숨기기 없음
Walter Roberson 2023년 2월 14일
The above can be vectorized. The vectorized version is faster than the loop or than my spdiags() solution.
The spdiags() solution is more compact, and so in some sense easier to understand. On the other hand, spdiags() is not one of the more common routines, so fewer people would be expected to understand it immediately without looking at the reference work; and while they might understand it for a while after that, if you were to have the same people look at the code (say) 6 months later, they would probably have lost the understanding. The loop solution is the more robust to that kind of longer term mental decay.
n = 9;
A = rand(n)
A = 9×9
0.6719 0.8061 0.2292 0.2202 0.1543 0.1305 0.1906 0.5847 0.7707 0.3742 0.3372 0.9419 0.7160 0.4509 0.9439 0.6036 0.0207 0.4701 0.1070 0.4909 0.9614 0.4621 0.8391 0.7562 0.8774 0.1968 0.9709 0.9364 0.1200 0.7590 0.4416 0.5981 0.0527 0.5583 0.9255 0.3805 0.2359 0.5982 0.7043 0.3346 0.7068 0.0744 0.5488 0.5272 0.3085 0.2901 0.2437 0.2179 0.0531 0.6202 0.6724 0.4453 0.7965 0.8494 0.3323 0.2516 0.7856 0.6836 0.4200 0.0216 0.7360 0.2761 0.9327 0.6585 0.5026 0.5395 0.2308 0.8373 0.2470 0.6693 0.7792 0.1291 0.1974 0.5096 0.5655 0.2327 0.1521 0.2926 0.0624 0.8403 0.5790
Acopy = A;
tic
for i=1:n-1
A(i,i) = 0.0;
A(i,i+1) = 0.0;
A(i+1,i) = 0.0;
end
toc
Elapsed time is 0.006974 seconds.
A
A = 9×9
0 0 0.2292 0.2202 0.1543 0.1305 0.1906 0.5847 0.7707 0 0 0 0.7160 0.4509 0.9439 0.6036 0.0207 0.4701 0.1070 0 0 0 0.8391 0.7562 0.8774 0.1968 0.9709 0.9364 0.1200 0 0 0 0.0527 0.5583 0.9255 0.3805 0.2359 0.5982 0.7043 0 0 0 0.5488 0.5272 0.3085 0.2901 0.2437 0.2179 0.0531 0 0 0 0.7965 0.8494 0.3323 0.2516 0.7856 0.6836 0.4200 0 0 0 0.9327 0.6585 0.5026 0.5395 0.2308 0.8373 0.2470 0 0 0 0.1974 0.5096 0.5655 0.2327 0.1521 0.2926 0.0624 0 0.5790
A = Acopy;
tic
n1 = n+1;
A(1:n1:end) = 0;
A(2:n1:end) = 0;
A(n1:n1:end) = 0;
toc
Elapsed time is 0.003191 seconds.
A
A = 9×9
0 0 0.2292 0.2202 0.1543 0.1305 0.1906 0.5847 0.7707 0 0 0 0.7160 0.4509 0.9439 0.6036 0.0207 0.4701 0.1070 0 0 0 0.8391 0.7562 0.8774 0.1968 0.9709 0.9364 0.1200 0 0 0 0.0527 0.5583 0.9255 0.3805 0.2359 0.5982 0.7043 0 0 0 0.5488 0.5272 0.3085 0.2901 0.2437 0.2179 0.0531 0 0 0 0.7965 0.8494 0.3323 0.2516 0.7856 0.6836 0.4200 0 0 0 0.9327 0.6585 0.5026 0.5395 0.2308 0.8373 0.2470 0 0 0 0.1974 0.5096 0.5655 0.2327 0.1521 0.2926 0.0624 0 0
A = Acopy;
tic
A = full(spdiags(zeros(9,3), -1:1, A));
toc
Elapsed time is 0.013573 seconds.
A
A = 9×9
0 0 0.2292 0.2202 0.1543 0.1305 0.1906 0.5847 0.7707 0 0 0 0.7160 0.4509 0.9439 0.6036 0.0207 0.4701 0.1070 0 0 0 0.8391 0.7562 0.8774 0.1968 0.9709 0.9364 0.1200 0 0 0 0.0527 0.5583 0.9255 0.3805 0.2359 0.5982 0.7043 0 0 0 0.5488 0.5272 0.3085 0.2901 0.2437 0.2179 0.0531 0 0 0 0.7965 0.8494 0.3323 0.2516 0.7856 0.6836 0.4200 0 0 0 0.9327 0.6585 0.5026 0.5395 0.2308 0.8373 0.2470 0 0 0 0.1974 0.5096 0.5655 0.2327 0.1521 0.2926 0.0624 0 0

댓글을 달려면 로그인하십시오.

### 범주

Find more on Operating on Diagonal Matrices in Help Center and File Exchange

R2021b

### Community Treasure Hunt

Find the treasures in MATLAB Central and discover how the community can help you!

Start Hunting!

Translated by