R语言中的数组和列表

R语言中的数组与其它语言数组类似，它是一种高维的数据结构。维数过高运算会很不方便，所以用的很少，这里介绍是本着不落下任何知识点的目的。万一以后遇到了，虽然不方便，还是可以进行运算的。当然了，矩阵是二维数组，是数组的一种特殊形式。R中的列表是一种特殊的数组，每个元素又可以是一个列表可以含有多个元素，里面可以包含各种数据类型，故功能非常强大。
    数组
数组有一个维数向量，可以定义数组的维数，通过array()进行创建数组如下：
> arr <- array(c(1:24),dim = c(2,3,4))
> dim(arr)
[1] 2 3 4
> arr
, , 1

     [,1] [,2] [,3]
[1,]    1    3    5
[2,]    2    4    6

, , 2

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

, , 3

     [,1] [,2] [,3]
[1,]   13   15   17
[2,]   14   16   18

, , 4

     [,1] [,2] [,3]
[1,]   19   21   23
[2,]   20   22   24

> class(arr)
[1] "array"
以上创建语句，第一个参数表示用1：24作为数组的数据，dim = c(2,3,4)表示数组维数为2x3x4。
我们也可以用下面这种方式定义数组：
> arr1 <- c(1:24)
> dim(arr1) <- c(2,3,4)
> arr1
, , 1

     [,1] [,2] [,3]
[1,]    1    3    5
[2,]    2    4    6

, , 2

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

, , 3

     [,1] [,2] [,3]
[1,]   13   15   17
[2,]   14   16   18

, , 4

     [,1] [,2] [,3]
[1,]   19   21   23
[2,]   20   22   24


> class(arr1)
[1] "array"

这种方式就是先指定向量c(1:24)为数组的数据，再指定其维数为2x3x4，最后其类型仍然为"array"。
矩阵的取块，其实与上节讲的矩阵取值一样。比如：
> arr[1,,]
     [,1] [,2] [,3] [,4]
[1,]    1    7   13   19
[2,]    3    9   15   21
[3,]    5   11   17   23

我们可以将数组转化为矩阵，比如我们尝试将arr这个数组转化为矩阵：
a <- as.matrix(arr)
猜测一下，a会长什么样？我们看一下，哈哈！
> a
      [,1]
 [1,]    1
 [2,]    2
 [3,]    3
 [4,]    4
 [5,]    5
 [6,]    6
 [7,]    7
 [8,]    8
 [9,]    9
[10,]   10
[11,]   11
[12,]   12
[13,]   13
[14,]   14
[15,]   15
[16,]   16
[17,]   17
[18,]   18
[19,]   19
[20,]   20
[21,]   21
[22,]   22
[23,]   23
[24,]   24

> dim(a)
[1] 24  1
竟然是一个24x1的矩阵，没想到吧。
    列表
R中用list()创建列表，比如
> li <- list(c(1:3),c('a','b'),c(4:6))
> li
[[1]]
[1] 1 2 3

[[2]]
[1] "a" "b"

[[3]]
[1] 4 5 6
这个列表包含三个元素，分别是c(1:3),c('a','b'),c(4:6)，而每个元素又是一个数据集合，我现在要取第一个元素的第三个元素（就是3）
> li[[1]][1]
[1] 1
取第一个元素，就是
> li[1]
[[1]]
[1] 1 2 3
列表的每个元素还是列表，同样说明列表可以嵌套。具体定位到最里层元素就是相应数据类型了：
> class(li[[1]][1])
[1] "integer"

> li[[2]][1]
[1] "a"

> class(li[[2]][1])
[1] "character"
我们可以给列表每个元素取一个名字
> names(li) <- c('a1','a2','a3')
> li
$a1
[1] 1 2 3

$a2
[1] "a" "b"

$a3
[1] 4 5 6
为什么取名字呢，这样我们引用时可以直接利用美元符号“$”+名字‘a1’，’a2‘，‘a3’，而不需要写[[1]]那么麻烦了。
> li$a1
[1] 1 2 3
> li$a2[1]
[1] "a"
其实，给列表起名字还有更方便之处，这才是最终目的：可以在绑定数据后，直接引用列表元素名即可。
绑定列表用attach()
> attach(li)
然后，就可以直接引用列表元素名了。
> a1
[1] 1 2 3
> a2[2]
[1] "b"
关于R语言中的数组和列表（主要是列表）用法很灵活多样，在以后我们会有实战应用会用到。这次，大家把今天介绍的好好练习就好！