如何设置一个矩阵的唯一行和列名时,它的尺寸是未知的?(How to set unique row a

2019-08-31 08:00发布

我有一个像矩阵:

     [,1][,2][,3][,4]
[1,]  12  32  43  55
[2,]  54  54  7   8
[3,]  2   56  76  88
[4,]  58  99  93  34

我不知道提前多少行和列我将在矩阵。 因此,我需要动态创建的行和列名。

我可以命名一样,直接列(行):

colnames(rmatrix) <- c("a", "b", "c", "d")

但是,我怎么能动态地创建我的名字载体,以适应矩阵的尺寸是多少?

nm <- ("a", "b", "c", "d")
colnames(rmatrix) <- nm 

Answer 1:

您可以使用rownamescolnames并设置do.NULL=FALSE ,以动态创建名称,如:

set.seed(1)
rmatrix  <-  matrix(sample(0:100, 16), ncol=4)

dimnames(rmatrix) <- list(rownames(rmatrix, do.NULL = FALSE, prefix = "row"),
                          colnames(rmatrix, do.NULL = FALSE, prefix = "col"))

rmatrix
     col1 col2 col3 col4
row1   26   19   58   61
row2   37   86    5   33
row3   56   97   18   66
row4   89   62   15   42

你可以改变prefix只要你想命名的行/ COLS。



Answer 2:

要动态名称的列(或行)你可以试试

colnames(rmatrix) <- letters[1:ncol(rmatrix)]

其中letters可以为你选择的列名的载体来代替。 您可以为行做类似的事情。



Answer 3:

您可以使用provideDimnames 。 合并不同程度的定制化的一些例子:

m <- matrix(1:12, ncol = 3)

provideDimnames(m)
#   A B  C
# A 1 5  9
# B 2 6 10
# C 3 7 11
# D 4 8 12

provideDimnames(m, base = list(letters, LETTERS))
#   A B  C
# a 1 5  9
# b 2 6 10
# c 3 7 11
# d 4 8 12

provideDimnames(m, base = list(paste0("row_", letters), paste0("col_", letters)))
#       col_a col_b col_c
# row_a     1     5     9
# row_b     2     6    10
# row_c     3     7    11
# row_d     4     8    12


文章来源: How to set unique row and column names of a matrix when its dimension is unknown?
标签: r matrix rename