희소 행렬의 상위 삼각형이 아닌 0 요소를 가져 오기 R

Question

R에서 희소 행렬의 0이 아닌 위쪽 삼각형 요소의 목록/벡터/배열을 검색하는 효율적인 방법을 찾으려고합니다. 예를 들어 :

library(igraph) 
    Gmini <- as.directed(graph.lattice(c(3,5))) 
    GminiMat <- sparseMatrix(i=get.edgelist(Gmini)[,1],j=get.edgelist(Gmini)[,2],x=1:length(E(Gmini))) 
    GminiMat 

    15 x 15 sparse Matrix of class "dgCMatrix" 

    [1,] . 1 . 2 . . . . . . . . . . . 
    [2,] 23 . 3 . 4 . . . . . . . . . . 
    [3,] . 25 . . . 5 . . . . . . . . . 
    [4,] 24 . . . 6 . 7 . . . . . . . . 
    [5,] . 26 . 28 . 8 . 9 . . . . . . . 
    [6,] . . 27 . 30 . . . 10 . . . . . . 
    [7,] . . . 29 . . . 11 . 12 . . . . . 
    [8,] . . . . 31 . 33 . 13 . 14 . . . . 
    [9,] . . . . . 32 . 35 . . . 15 . . . 
    [10,] . . . . . . 34 . . . 16 . 17 . . 
    [11,] . . . . . . . 36 . 38 . 18 . 19 . 
    [12,] . . . . . . . . 37 . 40 . . . 20 
    [13,] . . . . . . . . . 39 . . . 21 . 
    [14,] . . . . . . . . . . 41 . 43 . 22 
    [15,] . . . . . . . . . . . 42 . 44 . 

그래서 이상적으로는 함수 getUpper (매트) 등이 getUpper (GminiMat) 이 1시 22분의 벡터 (GminiMat의 상단 삼각 비 - 제로 항목)을 얻을 것

을하고 싶습니다

이상적으로는 신청해야 할 수도 있기 때문에 상당히 기억이 빠르고 효율적인 방법이 필요합니다. 대형 시스템 (예. 행렬은 각 차원에서 수 백 개의 노드가있는 다차원 격자에서 나올 수 있습니다).

Answer 1

가 희소 유지하면서 상단 삼각형을 반환 패키지 매트릭스의 방법 triu 있습니다 :

triu(GminiMat) 
15 x 15 sparse Matrix of class "dtCMatrix" 

[1,] . 1 . 2 . . . . . . . . . . . 
[2,] . . 3 . 4 . . . . . . . . . . 
[3,] . . . . . 5 . . . . . . . . . 
[4,] . . . . 6 . 7 . . . . . . . . 
[5,] . . . . . 8 . 9 . . . . . . . 
[6,] . . . . . . . . 10 . . . . . . 
[7,] . . . . . . . 11 . 12 . . . . . 
[8,] . . . . . . . . 13 . 14 . . . . 
[9,] . . . . . . . . . . . 15 . . . 
[10,] . . . . . . . . . . 16 . 17 . . 
[11,] . . . . . . . . . . . 18 . 19 . 
[12,] . . . . . . . . . . . . . . 20 
[13,] . . . . . . . . . . . . . 21 . 
[14,] . . . . . . . . . . . . . . 22 
[15,] . . . . . . . . . . . . . . . 

Answer 2

summary 기능을 사용해야합니다.

subset(summary(GminiMat), j > i) 

을 참조하십시오. 미정 :

getUpper <- function(mat) subset(summary(mat), j > i)$x