R语言数据分析

列表

stu.lst <- list(name = “xiaoming”, id = 1001, is.past.exam = T)
stu.lst
$name
[1] “xiaoming”

$id
[1] 1001

$is.past.exam
[1] TRUE

stu.lst2 <- list(“xiaoming”, 1001, T)
stu.lst2
[[1]]
[1] “xiaoming”

[[2]]
[1] 1001

[[3]]
[1] TRUE

new.1 <- vector(mode = “list”)
new.1
list()
stu.lst <- list(name = c(“xiaoming”,“xiaohua”), id=1001, is.past.exam = T);stu.lst
$name
[1] “xiaoming” “xiaohua”

$id
[1] 1001

$is.past.exam
[1] TRUE

#列表添加元素

stu.lst
$name
[1] “xiaoming” “xiaohua”

$id
[1] 1001

$is.past.exam
[1] TRUE

[[4]]
[1] 98

stu.lst$age <- 19
stu.lst
$name
[1] “xiaoming” “xiaohua”

$id
[1] 1001

$is.past.exam
[1] TRUE

[[4]]
[1] 98

$age
[1] 19

length(stu.lst)
[1] 5
stu.lst[[5]] <- 98
stu.lst[6:8] <- 1:3
stu.lst
$name
[1] “xiaoming” “xiaohua”

$id
[1] 1001

$is.past.exam
[1] TRUE

[[4]]
[1] 98

$age
[1] 98

[[6]]
[1] 1

[[7]]
[1] 2

[[8]]
[1] 3

#列表删除元素
stu.lst
$name
[1] “xiaoming” “xiaohua”

$id
[1] 1001

$is.past.exam
[1] TRUE

[[4]]
[1] 98

$age
[1] 98

[[6]]
[1] 1

[[7]]
[1] 2

[[8]]
[1] 3

stu.lst[[8]] <- NULL
stu.lst
$name
[1] “xiaoming” “xiaohua”

$id
[1] 1001

$is.past.exam
[1] TRUE

[[4]]
[1] 98

$age
[1] 98

[[6]]
[1] 1

[[7]]
[1] 2

stu.lst[6:7] <- NULL
stu.lst
$name
[1] “xiaoming” “xiaohua”

$id
[1] 1001

$is.past.exam
[1] TRUE

[[4]]
[1] 98

$age
[1] 98

stu.lst$age <- NULL
stu.lst
$name
[1] “xiaoming” “xiaohua”

$id
[1] 1001

$is.past.exam
[1] TRUE

[[4]]
[1] 98

#将多个列表拼接成一个列表
stu.lst
$name
[1] “xiaoming” “xiaohua”

$id
[1] 1001

$is.past.exam
[1] TRUE

[[4]]
[1] 98

stu.lst2
[[1]]
[1] “xiaoming”

[[2]]
[1] 1001

[[3]]
[1] TRUE

c(stu.lst, stu.lst2)
$name
[1] “xiaoming” “xiaohua”

$id
[1] 1001

$is.past.exam
[1] TRUE

[[4]]
[1] 98

[[5]]
[1] “xiaoming”

[[6]]
[1] 1001

[[7]]
[1] TRUE

#访问列表元素的标签
stu.lst
$name
[1] “xiaoming” “xiaohua”

$id
[1] 1001

$is.past.exam
[1] TRUE

[[4]]
[1] 98

names(stu.lst)
[1] “name” “id” “is.past.exam” “”