HoRain云--R语言列表操作全指南：从入门到精通

# 向量混合类型会强制转换（全转为字符） c(1, "a", TRUE) # 输出: "1" "a" "TRUE" # 列表保留原始类型 list(1, "a", TRUE) # 输出: [] 1; [] "a"; [] TRUE

nested_list <- list( personal = list(name = "Alice", age = 30), scores = c(90, 85, 78) ) nested_list$personal$name # 输出: "Alice"

my_list <- list(a = 1) my_list$b <- "新增元素" # 直接添加命名元素 my_list$a <- NULL # 删除元素a

# 命名元素（推荐，提升可读性） student <- list( name = "张三", age = 20, scores = c(92, 85, 78) ) # 匿名元素（按位置索引访问） info <- list("李四", 22, c(88, 90))

student$name # 输出: "张三"（字符型） student # 输出: c(92,85,78)（数值向量）

student[] # 输出: 20（数值）

class(student) # 输出: "list"（而非"character"） student + 10 # 报错：列表不能直接运算

student$city <- "北京" # 添加命名元素 student[] <- "匿名元素" # 按位置添加

student$age <- NULL # 删除age元素

list1 <- list(a = 1) list2 <- list(b = "x") combined <- c(list1, list2) # 合并后包含a和b

unlist(list(1, 2, 3)) # 输出: c(1,2,3)（数值向量） unlist(list(1, "a")) # 输出: c("1","a")（强制转为字符）

model <- lm(mpg ~ wt, data = mtcars) class(model) # 输出: "list" model$coefficients # 提取回归系数

class_data <- list( names = c("Alice", "Bob"), scores = data.frame(math = c(90, 85), english = c(88, 92)), art_scores = list(Alice = "A") # Bob无美术成绩 )

get_stats <- function(x) { list(mean = mean(x), sd = sd(x)) } result <- get_stats(c(1,2,3)) result$mean # 输出: 2

• 用[ ]提取元素后仍为列表，需二次解包才能计算（如student正确，student["scores"]错误）。

as.data.frame(list(a = 1:3, b = c("x", "y", "z")))