私は次のようなマトリックスを持っています:
[,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
次のように、名前を動的に作成するために、rownames
とcolnames
を使用し、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
を変更して、必要に応じて行/列に名前を付けることができます。
動的に列(または行)に名前を付けるには、試すことができます
colnames(rmatrix) <- letters[1:ncol(rmatrix)]
letters
は、選択した列名のベクトルに置き換えることができます。行についても同様のことができます。
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