R中现有数组的命名维度

我已经创建了一个现有数组，我想命名这个数组的维度。我不能使用

array（）

的

dimnames=

参数，因为我需要使用不同的函数创建此数组。我需要使用类似于以下内容的内容重命名维度

names（my.array）Use
dimnames（x）dimnames（A）A
A.
A、B、C、D
A 1234
B 2 4 6 8
C36912
B
A、B、C、D
A 2 4 6 8
B 4 8 12 16
C 6 12 18 24

矩阵示例：

> B <- matrix(1:12,3,4)
> B
     [,1] [,2] [,3] [,4]
[1,]    1    4    7   10
[2,]    2    5    8   11
[3,]    3    6    9   12
> rownames(B) <- letters[1:3]
> B
  [,1] [,2] [,3] [,4]
a    1    4    7   10
b    2    5    8   11
c    3    6    9   12
> colnames(B) <- LETTERS[1:4]
> B
  A B C  D
a 1 4 7 10
b 2 5 8 11
c 3 6 9 12

>B
[,1] [,2] [,3] [,4]
[1,]    1    4    7   10
[2,]    2    5    8   11
[3,]    3    6    9   12
>行名（B）B
[,1] [,2] [,3] [,4]
a 14 7 10
b 2 5 8 11
C36912
>colnames（B）B
A、B、C、D
a 14 7 10
b 2 5 8 11
C36912
对于三维阵列，您仍然可以使用
dimnames，如何在保留原有dim2的同时重命名dim1和dim3？@RNA
dimnames（a）[[1]]
> B <- matrix(1:12,3,4)
> B
     [,1] [,2] [,3] [,4]
[1,]    1    4    7   10
[2,]    2    5    8   11
[3,]    3    6    9   12
> rownames(B) <- letters[1:3]
> B
  [,1] [,2] [,3] [,4]
a    1    4    7   10
b    2    5    8   11
c    3    6    9   12
> colnames(B) <- LETTERS[1:4]
> B
  A B C  D
a 1 4 7 10
b 2 5 8 11
c 3 6 9 12

someArray <- array(1:30, dim=c(2, 3, 5))

dimnames(someArray) <- list(c("Hello", "World"), LETTERS[6:8], letters[1:5])

someArray

  # , , a

  #       F G H
  # Hello 1 3 5
  # World 2 4 6

  # , , b

  #       F  G  H
  # Hello 7  9 11
  # World 8 10 12

  # , , c

  #        F  G  H
  # Hello 13 15 17
  # World 14 16 18

  # , , d

  #        F  G  H
  # Hello 19 21 23
  # World 20 22 24

  # , , e

  #        F  G  H
  # Hello 25 27 29
  # World 26 28 30