Cómo subconjuntar la matriz en una columna, mantener el tipo de datos de matriz, mantener los nombres de fila/columna?

Question

Cuando subconjunto una matriz a una sola columna, el resultado es de clase numérica, no de matriz (es decir, myMatrix [, 5] para subconjuntos a la quinta columna). ¿Hay una manera compacta al subconjunto a una sola columna, mantener el formato de la matriz, y mantener los nombres de fila/columna sin hacer algo complicados como:

matrix(myMatrix[ , 5 ] , dimnames = list(rownames(myMatrix) , colnames(myMatrix)[ 5 ]) 

Answer 1

utilizar el argumento drop=FALSE a [.

m <- matrix(1:10,5,2) 
rownames(m) <- 1:5 
colnames(m) <- 1:2 
m[,1]    # vector 
m[,1,drop=FALSE] # matrix