列表是R语言中的对象,它包含不同类型的元素,比如 - 数字,字符串,向量和另一个列表等。一个列表还可以包含一个矩阵或一个函数作为它的元素。使用list()函数创建列表。
创建一个列表
下面是一个例子来创建一个包含字符串,数字,向量和逻辑值的列表
# Create a list containing strings, numbers, vectors and a logical values.list_data <- list("Red", "Green", c(21,32,11), TRUE, 51.23, 119.1)print(list_data)
当我们上面的代码执行时,它产生以下结果:
[[1]][1] "Red"[[2]][1] "Green"[[3]][1] 21 32 11[[4]][1] TRUE[[5]][1] 51.23[[6]][1] 119.1
命名列表元素
列表元素可以给定它们的名字并且可以使用这些名称来访问。
# Create a list containing a vector, a matrix and a list.list_data <- list(c("Jan","Feb","Mar"), matrix(c(3,9,5,1,-2,8), nrow=2), list("green",12.3))# Give names to the elements in the list.names(list_data) <- c("1st Quarter", "A_Matrix", "A Inner list")# Show the list.print(list_data)
当我们上面的代码执行时,它产生以下结果:
$`1st_Quarter`[1] "Jan" "Feb" "Mar"$A_Matrix [,1] [,2] [,3][1,] 3 5 -2[2,] 9 1 8$A_Inner_list$A_Inner_list[[1]][1] "green"$A_Inner_list[[2]][1] 12.3
访问列表元素
列表的元素可以通过在列表中的元素的索引来访问。如遇命名列表也可以使用名称来访问。
我们继续使用在上面例子的列表
# Create a list containing a vector, a matrix and a list.list_data <- list(c("Jan","Feb","Mar"), matrix(c(3,9,5,1,-2,8), nrow=2), list("green",12.3))# Give names to the elements in the list.names(list_data) <- c("1st Quarter", "A_Matrix", "A Inner list")# Access the first element of the list.print(list_data[1])# Access the thrid element. As it is also a list, all its elements will be printed.print(list_data[3])# Access the list element using the name of the element.print(list_data$A_Matrix)
当我们上面的代码执行时,它产生以下结果:
$`1st_Quarter`[1] "Jan" "Feb" "Mar"$A_Inner_list$A_Inner_list[[1]][1] "green"$A_Inner_list[[2]][1] 12.3 [,1] [,2] [,3][1,] 3 5 -2[2,] 9 1 8
操控列表元素
我们可以添加,删除和更新列表中的元素,如下图所示。我们可以增加或删除而且只能添加到列表的末尾的元素。但是可以更新任何元素。
# Create a list containing a vector, a matrix and a list.list_data <- list(c("Jan","Feb","Mar"), matrix(c(3,9,5,1,-2,8), nrow=2), list("green",12.3))# Give names to the elements in the list.names(list_data) <- c("1st Quarter", "A_Matrix", "A Inner list")# Add element at the end of the list.list_data[4] <- "New element"print(list_data[4])# Remove the last element.list_data[4] <- NULL# Print the 4th Element.print(list_data[4])# Update the 3rd Element.list_data[3] <- "updated element"print(list_data[3])
当我们上面的代码执行时,它产生以下结果:
[[1]][1] "New element"$NULL$`A Inner list`[1] "updated element"
合并列表
可以把所有的列表传到一个 list()函数合并多个列表成一个列表。
# Create two lists.list1 <- list(1,2,3)list2 <- list("Sun","Mon","Tue")# Merge the two lists.merged.list <- c(list1,list2)# Print the merged list.print(merged.list)
当我们上面的代码执行时,它产生以下结果:
[[1]][1] 1[[2]][1] 2[[3]][1] 3[[4]][1] "Sun"[[5]][1] "Mon"[[6]][1] "Tue"
转换列表为向量
列表可以被转换为一个向量,以便能用于进一步操纵向量的元素。所有关于向量的算术运算可以在列表被转换为矢量之后被应用。要做到这一点转换,使用unlist() 函数。它以列表作为输入,并产生一个向量。
# Create lists.list1 <- list(1:5)print(list1)list2 <-list(10:14)print(list2)# Convert the lists to vectors.v1 <- unlist(list1)v2 <- unlist(list2)print(v1)print(v2)# Now add the vectorsresult <- v1+v2print(result)
当我们上面的代码执行时,它产生以下结果:
[[1]][1] 1 2 3 4 5[[1]][1] 10 11 12 13 14[1] 1 2 3 4 5[1] 10 11 12 13 14[1] 11 13 15 17 19