R言語 - 行列から列ベクトル抽出時に行ベクトルになるのを避ける

drop = Fを使う。

> tmpmat1 <- matrix(1:12, nrow=3)

> tmpmat1

     [,1] [,2] [,3] [,4]

[1,]    1    4    7   10

[2,]    2    5    8   11

[3,]    3    6    9   12

> tmpmat1[,2]

[1] 4 5 6

> tmpmat1[,2, drop=F]

     [,1]

[1,]    4

[2,]    5

[3,]    6

>