Question

我试图在过滤后保留矩阵的colnames和rownames。但是，无论使用drop = FALSE，我都会丢失矩阵和相关名称。示例如下。

mat <- matrix(runif(100),ncol=5)
colnames(mat) = letters[1:5];
rownames(mat)=paste("test",letters[1:20],sep="")
m2 <- mat[(mat >= 0.55), drop=FALSE]

m2
     [1] 0.5836022 0.9931983 0.9923270 0.8296150 0.5848827 0.5587868 0.7914669 0.6888435 0.7184756 0.8201574 0.6157212 0.5979301 0.6789259 0.8648659 0.5700341 0.6313953 0.6824154
    [18] 0.6978662 0.7297806 0.9376626 0.6095106 0.6128999 0.8729137 0.6194508 0.8805783 0.8857406 0.5706092 0.8307489 0.9863317 0.6729674 0.9071986 0.7061558 0.8433151 0.7381484
    [35] 0.8969046 0.7389939 0.9188947 0.6714318 0.7584971 0.7197169 0.9407508 0.7128124 0.6844223 0.6561814 0.9549364 0.9427498 0.9638931 0.6087301

如何在过滤后恢复我的矩阵并保留相关的colnames和rownames。任何建议都会非常有帮助。

Answer 1

找到了解决方案。

mat2 <- ifelse(mat<0.55,NA,mat)

过滤后保留colnames和rownames

1 个答案: