r - 如何在维度未知时设置矩阵的唯一行名和列名？

Question

我有像这样的矩阵：

     [,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

您可以使用rownamesandcolnames和设置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命名行/列。

Answer 2

要动态命名列（或行），您可以尝试

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

whereletters可以替换为您选择的列名向量。你可以对行做类似的事情。  

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