R中Matrix包稀疏矩阵转换为普通稠密矩阵时如何保留行列名？

转换丢失行列名的原因 #

这是Matrix包早期版本的设计取舍：稀疏矩阵的核心运算优先保障性能，行列名属于附加元数据，默认不在转换、运算过程中传递，避免额外的内存开销，尤其在处理超大规模稀疏矩阵时，该设计能显著降低不必要的资源占用。目前1.4.0及更新版本的Matrix包已经优化了该逻辑，直接调用as.matrix(M)就会自动保留行列名。

兼容所有版本的简洁解决方案 #

无需依赖原始稠密矩阵m，直接从现有Matrix对象M提取行列名绑定即可，单行即可完成转换：

m2 <- `dimnames<-`(as.matrix(M), dimnames(M))

如果需要频繁执行该操作，可以自定义工具函数简化调用：

# 自定义转换函数：Matrix转基础matrix，自动保留行列名
as_matrix_keep_names <- function(sparse_mat) {
  stopifnot(inherits(sparse_mat, "Matrix"))
  res <- as.matrix(sparse_mat)
  dimnames(res) <- dimnames(sparse_mat)
  return(res)
}

# 调用示例
m2 <- as_matrix_keep_names(M)

内容的提问来源于stack exchange，提问作者Ben Bolker