如何在对角矩阵中标记行和列？

Question

我在R中创建了一个方差的对角矩阵，因此：

D <- diag(data $ Variances, 
          length(data $ Variances), 
          length(data $ Variances))

有谁知道如何添加行标签和列标签？标签是来自数据框“data”的“Species”列中的物种名称，其中“Variances”列也取自。

Answer 1

只需使用colnames(D) <- your.col.names和rownames(D) <- your.row.names将列和行名称添加到矩阵D中。

Answer 2

dimnames是另一个有用的功能，有关详细信息，请参阅?dimnanes。

> Mat <- matrix(1:12, ncol=3) # creating a matrix
> Mat  # no dimnames
     [,1] [,2] [,3]
[1,]    1    5    9
[2,]    2    6   10
[3,]    3    7   11
[4,]    4    8   12
> dimnames(Mat) <- list(letters[1:4], LETTERS[1:3])
> Mat # with dimnames
  A B  C
a 1 5  9
b 2 6 10
c 3 7 11
d 4 8 12