从R中的稀疏矩阵重构稠密矩阵

Question

我有一个很大的数据集，它表示为文本文件中的稀疏矩阵（三列，i，j，值）。 我正在尝试两个单独的分析-首先，找到每一列的平均值，第二，找到矩阵的所有对角线元素。

由于先前的数据集以不太精细的方式表示相同的信息，因此我只使用了普通矩阵函数。 为了对此稀疏矩阵执行相同的操作，我想重建密集矩阵并以相同的方式进行计算。 但是，如果有一种方法可以在不重建密集矩阵的情况下获得列平均值/对角线，那么效果也很好。

Answer 1

我们可以使用colMeans和diag

colMeans(m1)
#[1] 0.0 0.6 2.8 0.0 1.4 0.0 2.8 0.0 2.4

diag(m1)
#[1] 0 0 9 0 0

数据

library(Matrix)
m1 <- sparseMatrix(c(1,1,2,3, 4,5), c(2,5, 3,3,7,9), 
               x = c(3,7, 5, 9, 14, 12))