R中的3维数组名称

Ris*_*ech 19 arrays r names

在下面的3维数组中:

ar <- array(someData, c(5, 5, 5));  
rownames(ar) <- ...;  #to set up row names
colnames(ar) <- ...;  #to set up col names
Run Code Online (Sandbox Code Playgroud)

如何设置第三维名称?

Dan*_*Dan 29

您可以dimnames在定义数组时设置参数:

ar <- array(data     = 1:27,
            dim      = c(3, 3, 3),
            dimnames = list(c("a", "b", "c"),
                            c("d", "e", "f"),
                            c("g", "h", "i")))
Run Code Online (Sandbox Code Playgroud)

和/或你可以设置dimnames第三个维度,如下所示:

dimnames(ar)[[3]] <- c("G", "H", "I")
Run Code Online (Sandbox Code Playgroud)


Pap*_*gui 9

仍然从 R 开始,但我发现这种方式可能对大型多维数组有用。

您可以使用 provideDimnames() 函数根据您选择的模式自动生成索引名称,而不是命名每个索引 ('a','b','c','d',....)。

创建数据

ar <- array (data = 1:(4*3*2) , dim=c(4,3,2))
> ar
, , 1

     [,1] [,2] [,3]
[1,]    1    5    9
[2,]    2    6   10
[3,]    3    7   11
[4,]    4    8   12

, , 2

     [,1] [,2] [,3]
[1,]   13   17   21
[2,]   14   18   22
[3,]   15   19   23
[4,]   16   20   24
Run Code Online (Sandbox Code Playgroud)

标签尺寸

ar <- provideDimnames(ar , sep = "_", base = list('row','col','lev'))
Run Code Online (Sandbox Code Playgroud)

你得到

> ar
, , lev

      col col_1 col_2
row     1     5     9
row_1   2     6    10
row_2   3     7    11
row_3   4     8    12

, , lev_1

      col col_1 col_2
row    13    17    21
row_1  14    18    22
row_2  15    19    23
row_3  16    20    24
Run Code Online (Sandbox Code Playgroud)