web-dev-qa-db-ja.com

次元が不明なときに行列の一意の行と列の名前を設定する方法は?

私は次のようなマトリックスを持っています:

     [,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 
19
SacHin DhiMan

次のように、名前を動的に作成するために、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を変更して、必要に応じて行/列に名前を付けることができます。

23
Jilber Urbina

動的に列(または行)に名前を付けるには、試すことができます

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

lettersは、選択した列名のベクトルに置き換えることができます。行についても同様のことができます。

8
Chinmay Patil

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
3
Henrik