R语言编程艺术学习笔记—第四章列表

终于又回来写《R语言编程艺术》的学习笔记了,坚持真的很难,战胜懒惰,坚持把这本书的学习笔记写完,自我监督!坚持分享之路!

列表这章主要包含列表的创建、增加、删除和函数应用。

列表也是向量,但是和向量有不同之处,向量中的元素只能是一种类型,但是列表中的组件可以是多种类型。

一、创建列表

使用list()来创建向量,通过$来指定某个组件,比如:

> a<-list(age=23,sex='woman',salary=5000)
> a
$`age`
[1] 23

$sex
[1] "woman"

$salary
[1] 5000

> a$salary
[1] 5000

也可以通过索引来访问,有两种,[ ]单括号访问的是列表,[[ ]]双括号访问的某个指定的组件,如:

> a[1]
$`age`
[1] 23

> a[[1]]
[1] 23

如果要提取子列表,可以通过[ ],如果要提取某个指定组件,用[[ ]],个人觉得提取某个指定组件用$更加方便。

二、增加、删除列表

1)使用$,直接新增

> a$name<-'Tom'
> a
$`age`
[1] 23

$sex
[1] "woman"

$salary
[1] 5000

$name
[1] "Tom"

通过$新增默认是添加到最后的位置,如果想要指定位置,就用[ ]或者[[ ]],添加首位可以用通过c()函数

> a<-list(age=23,sex='woman',salary=5000)
> a[5:6]<-c(TRUE,FALSE)
> a
$`age`
[1] 23

$sex
[1] "woman"

$salary
[1] 5000

[[4]]
NULL

[[5]]
[1] TRUE

[[6]]
[1] FALSE
> a<-list(age=23,sex='woman',salary=5000)
> c(list(hobby='swimming'),a)
$`hobby`
[1] "swimming"

$age
[1] 23

$sex
[1] "woman"

$salary
[1] 5000

删除组件通过将值设置为NULL即可,这里展示的通过指定索引,实际上a$age<-NULL,也可以指定删除

> a[[6]]<-NULL
> a
$`age`
[1] 23

$sex
[1] "woman"

$salary
[1] 5000

[[4]]
NULL

[[5]]
[1] TRUE

三、lapply()和sapply()函数的使用

> lapply(list(1:7,21:24),median)
[[1]]
[1] 4

[[2]]
[1] 22.5

> sapply(list(1:7,21:24),median)
[1]  4.0 22.5

从上面例子可以直观看出两个函数的作用,对列表使用某函数,输出结果,sapply()作用结果更加直观清晰。

有一个参数的设置可以留心下:

> c(list(a=1,b=2,c=list(d=4,e=9)))
$`a`
[1] 1

$b
[1] 2

$c
$c$`d`
[1] 4

$c$e
[1] 9


> c(list(a=1,b=2,c=list(d=4,e=9)),recursive=T)
  a   b c.d c.e 
  1   2   4   9 

recursive=T设置后,在组合列表时,输出的结果更加友好,可以设置下的。

列表的内容就是这么多,也比较好理解,今天的分享就到这里,下次数据框见,下一章的内容对学习R语言很重要。

猜你喜欢

转载自blog.csdn.net/Anna_datahummingbird/article/details/82262935