4

这一直困扰着我。考虑以下:

# Part A #
# Make a silly simple matrix with column names
x = matrix(1:4, ncol = 2)
colnames(x) = c("a","b")

# Part B #
# Pick out the first row of the matrix.  This is not a matrix, 
#   and the column names are no longer accessible by colnames()
y = x[1,]
y
is.matrix(y)
colnames(y)

# Part C #
# But here is what I want:
y = matrix(x[1,], nrow = 1, dimnames = list(c(), colnames(x)))

有什么方法可以用更少的处理步骤或更少的代码来实现 C 部分?似乎应该有一个几乎与执行相同操作的命令一样短的命令x[1,]

4

2 回答 2

5

只需设置drop=FALSE如下:

> y = x[1,, drop=FALSE]
> y
     a b
[1,] 1 3
于 2013-09-25T17:53:31.823 回答
4

怎么样

x[1,,drop=FALSE]
     a b
[1,] 1 3
于 2013-09-25T17:53:48.950 回答