子集化1列矩阵删除rownames

Question

当我尝试通过其行名称对1列矩阵进行子集时，子集可以工作但返回数字向量。

你能以某种方式阻止这种行为并保留行名吗？

M<-as.matrix(rnorm(5))
rownames(M)<-LETTERS[1:5]
M
        [,1]
A  0.6250957
B  0.7330598
C -0.7127075
D  0.2162602
E  0.2223444

M <- M[which(rownames(M) != "A")]

M
## [1]  0.7330598 -0.7127075  0.2162602  0.2223444

Answer 1

您可以在帮助页面中阅读有关参数drop的内容：?'['

M[which(rownames(M) != "A"), ,drop=FALSE]