R语言中列表的常规操作

 

1、创建列表

a <- 1:5
b <- "abcd"
c <- matrix(1:9, nrow = 3)
d <- letters[1:10]

dat <- list(a = a, b = b, c = c, d = c)        ## 创建列表， a = a操作的目的是给列表元素命名
dat                                            ## 查看列表

 

 

2、查看列表元素

dat
dat$b                       ## 查看列表元素的三种方法
dat[["b"]]
dat[[2]]

 

3、向列表中增加元素

方法1

a <- 1:5
b <- matrix(1:10, nrow = 2)
dat <- list(a = a, b = b)
dat
dat$new1 <- "xxx"         ## 向列表中增加元素
dat

 

 

方法2

a <- 1:5
b <- matrix(1:10, nrow = 2)
dat <- list(a = a, b = b)
dat
dat[["new1"]] = "yyyyy"                ## 增加元素
dat

 

 

方法3：

a <- 1:5
b <- matrix(1:10, nrow = 2)
dat <- list(a = a, b = b)
dat
dat[[3]] = "yyyyy"                              ## 添加元素
dat

 

 

4、删除列表中的元素

 

a <- 1:5
b <- matrix(1:10, nrow = 2)
c <- c("one", "two", "three")
dat <- list(a = a, b = b, c = c)
dat
dat[["c"]] = NULL                     ## 删除列表中元素
dat

 

 

a <- 1:5
b <- matrix(1:10, nrow = 2)
c <- c("one", "two", "three")
dat <- list(a = a, b = b, c = c)
dat
dat[["b"]] = NULL                      ## 删除列表元素
dat

 

5、实现两个列表的合并

a = 1:5
b <- letters[1:3]
dat1 <- list(a = a, b = b)
dat1                                           ## 列表1

c <- 11:15
d <- LETTERS[1:5]
dat2 <- list(c = c, d = d)
dat2                                           ## 列表2

for (i in 1:length(dat2)) {                    ## 列表1和列表2合并至列表1
  dat1[[names(dat2)[i]]] <- dat2[[i]]
}
dat1