文章/答案/技术大牛

发布

社区首页 >问答首页 >在稀疏矩阵中逐列排列非零元素

问在稀疏矩阵中逐列排列非零元素
EN

Stack Overflow用户

提问于 2017-01-20 21:53:08

回答 1查看 172关注 0票数 1

我有一个很大的稀疏矩阵，并且想逐列排列它的非零元素。我现在使用的方法是将所有零转换为NA。这种方法的问题是，矩阵不再是稀疏的，并且在这样做时具有空间复杂性。

是否有任何方法使用函数rank而不将零转换为NA？可复制的例子：

library(Matrix)

TestMatrix = Matrix(c(0,100,12,0,11,
                      0,100,12,0,11,
                      0,100,12,0,11,
                      0,100,12,0,11,
                      0,100,12,0,11), 5, sparse = TRUE)

TestMatrix = replace(TestMatrix, TestMatrix == 0, NA)

apply(-TestMatrix, 2, function(x) {rank(x, na.last = TRUE)})

我想要一个相同大小的稀疏矩阵，用列级代替非零值。

matrix

sparse-matrix

回答 1

Stack Overflow用户

回答已采纳

发布于 2017-01-20 22:00:37

你的例子TestMatrix

#5 x 5 sparse Matrix of class "dgCMatrix"
#                        
#[1,]   .   .   .   .   .
#[2,] 100 100 100 100 100
#[3,]  12  12  12  12  12
#[4,]   .   .   .   .   .
#[5,]  11  11  11  11  11

我想要一个相同大小的稀疏矩阵，用列级代替非零值。

n <- diff(TestMatrix@p)  ## number of non-zeros per column
lst <- split(TestMatrix@x, rep.int(1:ncol(TestMatrix), n))  ## columns to list
r <- unlist(lapply(lst, rank))  ## column-wise ranking and result collapsing
RankMatrix <- TestMatrix  ## copy sparse matrix
RankMatrix@x <- r  ## replace non-zero elements with rank

#5 x 5 sparse Matrix of class "dgCMatrix"
#              
#[1,] . . . . .
#[2,] 3 3 3 3 3
#[3,] 2 2 2 2 2
#[4,] . . . . .
#[5,] 1 1 1 1 1

票数 1

页面原文内容由Stack Overflow提供。腾讯云小微IT领域专用引擎提供翻译支持

原文链接：

https://stackoverflow.com/questions/41772943

复制

相似问题

问在稀疏矩阵中逐列排列非零元素
EN

回答 1

Stack Overflow用户

社区

活动

圈层

关于

腾讯云开发者

热门产品

热门推荐

更多推荐

问在稀疏矩阵中逐列排列非零元素EN

回答 1

Stack Overflow用户

社区

活动

圈层

关于

腾讯云开发者

热门产品

热门推荐

更多推荐

问在稀疏矩阵中逐列排列非零元素
EN