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语言中的数组和列表（主要是列表）用法很灵活多样，在以后我们会有实战应用会用到。
文章评论