2012-07-29 1649 views

回答

5

这里有一个解决方案:

Alower = tril(A, -1); 
Aupper = triu(A, 1); 
result = Alower(:, 1:end-1) + Aupper(:, 2:end) 

演示:

> A = [1 2 3; 1 2 3; 1 2 3] 
A = 

    1 2 3 
    1 2 3 
    1 2 3 

> tril(A, -1)(1:end, 1:end-1) + triu(A, 1)(1:end, 2:end) 
ans = 

    2 3 
    1 3 
    1 2 
+0

它不工作,它给了我这个错误: ???错误:()-indexing必须最后出现在索引表达式中。 – 2012-07-29 14:31:55

+0

尝试新的。 – aioobe 2012-07-29 14:35:35

+0

哇,我做了一些改变,它的工作......感谢您的帮助,,,这是非常聪明的 – 2012-07-29 14:42:42

0

这里的另一种方式

reshape(A(setdiff(1:9,1:4:9)),[3,2]) 
3

注意,有两种可能性,你消除对角线后n通过n matirx:

  1. 如果后果矩阵是nn-1(就像你的问题) ,你可以做到这一点:

    A=A'; 
    A(1:n+1:n*n)=[]; 
    A=reshape(A,n-1,n)'; 
    
  2. 如果善后矩阵是由n-1n,你可以做这样的:

    A(1:n+1:n*n)=[]; 
    A=reshape(A,n-1,n); 
    
+0

这几乎是优秀的,但它确实返回一个行向量,而不是一个数组。 – 2012-07-29 15:04:41

+0

@HighPerformanceMark答案已更新 – chaohuang 2012-07-29 15:30:50